ロロ ロロ ロロ ロ
| リー トッ ・・・・・・・
|
レー プ
口 ロ ロロ ロロ ロ
ュ // ノ 2
ロキ 半生 せ せ ロ 有 G
LHD ロミ
| ほ
le HO /150]1 の
6 0 シリ ー ズ : Io ooocersisd
)
ト
庶
し っ)
TI
ロロ ロロ ロロ ロ
口 井 圭 草 丼 神
ロ 口 口 口 口 ロ
音楽 と 漢字 で 断然 差 が
MSX が ゲー ム だ け で は も っ た いな い 。 ヤ マハ な ら 「 拡 張 ユ ニッ ト 」 を 半 着 する だ
SFG-01 を BASIC で コン
トロ ー ル する 。 「 YRM-11
FM 音源 に よる 演奏 を し な が ら グ ラフ ィ
ッ ク 画 面 を 楽し ん だ り 、 効 果 音 を 創っ た
りす る こと が BASIC ブ ログ ラム で 可能 。
音声 合成 機能 に より 、 MSX に し ゃ べら
せ た り 誤 わ せ た り する こと も で きま す 。
FM ミュ ー ジ ッ ク マ クロ
YRM-| \7.800
(RAM 容 量 は 32KB 以 上 必要 )
本 格 的 な 音楽 マシ ン へ
の 立役者 は これ 。 SFG-01
リア ル な 「FM 音 源 」 で 48 種 の 音色 デー
タ を 内 大 。 最 大 8 音 の 同時 発音 可能 で 、
| し か も 各 音 個別 の 音色 設定 可能 . 豊富
は 1 ロ
9 | も ー ジ
9 』 性 |
つ *K 避 4
や 1 た ミ
ど * 1 計
Q | 3 人
9 |
9 R 3 全 : 必 も ー3
8 お 3 :K 腕 和え
4 すさ も さき 1Kd る
K gi* き 1 だ K に K 4
3M 全 き 1R S 1 び 写 人
け ユ けり 4 ロロ ュ 3 9 1 ロス ジイ 1 お 3 おり
き た % ョ ン に 音
で 史 な が ら 6 三
り を 楽し め る 。 YRM-12
SFG-01| を コン トロ ー ル し て 、 画面 を 見 な
が ら デ ー タ を 入れ て 自分 だ け の オリ ジ
ナル な 音色 を 創り あげ ける こと が で きま
す 。 作成 し た デー タ は カセ ッ ト に 保存 で
き 、YRM-1 な ど で 利 用 で きま す
FM 音色 フロ グラ ム 、
YRM-I2 \7.800
SS
SS
SS
まま る
WAN
FM 5ound SuniheSizet U
9 あべ A に S
な ソフ ト や 周辺 機 対 と の 組合 せ で 、 自
動 演奏 は も ちろ 人 ん 、 新 し い 音 創り ・ 曲 創
りや 音声 合成 まで 自在 に 楽し め ま す
記 い rosa
FM サウ ント
シン セ サ イ ザ ユ ニット
SFG-0| \I9.800
(YIS 503 303 は 直接 、 各 社
製品 に は UCN-0| を 介し て 、
接続 する こと が で きま す )
MSX マ シン を 自動 演奏 さ
せる の は これ 。 YRM-15
画面 上 で 音符 な ど を 入力 する と 自動 的
に 譜面 化 さ れ 、 そ の 曲 を 自動 演奏 させ
て 楽し め る 他 、 楽 譜 を プリ ント アウ ト す
る こと も 可能 。 入 れ た デー タ の 訂正 ・ 削
除 も 簡単 で 、 カセ ッ ト に 保存 も で きま す
FM ミュ ー ジ ッ ク コ ン ホ ー ザ
YRM-I5 Y7800
ミュ ー ジ ッ ク キ ー ポ ボー ド
FM サウ ンド シン セ サ イ ザ ユ ニッ ト に 接
続 し て 、MSX マ シン を ミュ ー ジ ッ ク シ ン
セ サ イ ザ と し て 活用 で きま す
ミュ ー ジ ッ ク キ ー ボ ー ド
YK-I0 \29.800(49 鍵 )
ミュ ー ジ ッ ク キ ー ボ ー ド
YK-0! 17.800(44 鍵 )
プレ イカ ー ド で MSX が 鮮
や か に 自動 演奏 。 ZPA-01
ポー タ サ ウン ド で お な じみ の プレ イカ ー
ド を カー ドリ ー タ ー に 通す だ け で コン ピ
ュー タ が 目 動 演奏 . 音量 や テン ボ 、 調 も
自由 に 変え られ 、 画 面 に は 演奏 内 容 を
表示 . 引 G-0! と 併用 すれ ば FM 音源 に
フレ イカ ー ド セッ ト
BA-0| \|I2.800
拡張 性 に 差 を つけ る サイ ドス ロッ ト 」 と | リア スロ ッ ト ,」 。 そ し て 、 RAMG64K 拡 張 も OK。
本 体 右 上 の 「ROM カ ー ト リッ ジス ロッ ト 」
は MSX マ シン に 標準 の スロ ッ ト 。 だ か ら
ゲー ム は も ちろ ん 、「 ミ ュー ジッ ク 」 や 「 グ
ラフ ィ ッ ク 」 な ど 、 市 販 の MSX 用 カー ト
リッ ジ ソ フ ト を すべ て 楽し め ま す 。
「 こ こ が 違 う 」 の 決定 打 は この 「 サイ ドス
ロッ ト 」。 ヤマ ハ 独 自 の 「 拡張 ユニ ッ ト 」 を
直接 装着 し て 本 体内 に 格納 で き 、 マ シ
ン を 本 格 的 な 「 ミ ュー ジッ クコ ンピュータ 」
や 「 ワ ー プ ロ シ ス テム 」 に 変身 させ ます 。
MSX マ ー ク は マイ クロ ソフ ト 社 の 商標 で す
そ し て き ぁ に は トリ アス ロッ ト 」。YIS
503 だ げ の スズ スロット ド で 、 シ ング ルル カー ド
リッ ジア ダフ タ を 介し て 各種 カー トリ ッ
ジ を 接続 使用 で きる た め 、 コ ンピュータ
活用 機能 の 質 と 量 が 大 幅 に 広がり ます
64K DOS 対 応
沈 秋 発売 予定 提 4%o 人 <
て の MSX 仕様 ソフ ト は RAM 32K で 使え ま
す , フロ ッ ピ ー デ ティ スク ドラ イブ を 接続 し て
も DISK-BASIC で 使う 場合 は 32K の まま
で よく 、64K の 必要 は あり ませ ん 。 DOS
を 使う 場合 に 64K 必 要 と な り ま す 。 SRM
-01| を サイ ドス ロッ ト に 装着 する こと て 、
YIS-503 の RAM 容 量 は 64K に 拡張 され 、
これ に 対応 で きま す
また 、 鮮 明 画 像 が 得
られ る 21 ピ ビン RGB 出
力も 内 蔵 し て いま す 。
32K RAM RGB ユ ニッ ト ・
SRM-0| 今秋 発売 予定
つく 〈、 ヤ マル MSX
$⑱) YAMAHA
け で ' 音 楽 」 や ! ワ ー プ ブロ 」 を 本 格 的 に 楽し め ま す
| WareW) 「
回 晶 目 奉 、 ス ピー ディ ー 交 再 勤
本 格 的 ワー プロ シス テム を 手軽 に 実現 。SKW-01
な の な
旧 沙 字 ワー プロ ユニ ッ ト . の 特徴 を 活か す の は 、
NO01.。
各種 用 紙 対 応 で 静 下 美 能 印 字 の P
「 封 転写 プリ ンタ 」 PN-01 は ao
極め て 便利 な 各種 用 紙 対 応
型 で 、A4・B5 紙 や 連続 用 紙
は も ちろ ん 、 ハ ガキ や 名 刺 に
も 直接 プリ ント で きま す 。
高密 度 |6 ド ッ ト ヘ ッ ド に よ
り | パ ス ( 行 程 ) で 美しく 、 静
粛 に 印字 可能 。MSX 準拠 で
ワー プロ 用 だ け で な く 、 通 常
の プリ ンタ と し て も 高 性 能 。
執 転写 フリ ンタ PN-0I| \89.800
プリ ンタ ケー ブル CB-01 \5.000
サー マル リボ ン ( 黒 ) PN-0IRB \3.900
サー マル リボ ン ( カ ラー) PN-0IRC \4.800
ヤマ 人 ハ の 拡張 ユニ ッ ト を
至 MSX ユ ー ザ ー に
ヤマ ハ の 拡張 ユニ ッ ト SFG-01、SKW
-0| は 、 ユ ニッ トコ ネ ク タ UCN-01| を 介
し て 各社 MSX コ ンピュータ の ROM
カー トリ ッ ジ スロ ッ ト に 接続 で きま す
y 注 : 但し 、 機種 に より 機能 を 十分
に 発揮 で き な い 場合 も あり ます
計ら ] ウー コロ
栖 世 氷 区
漢字 住所 録 の 作成 や ラベ ル
「 漢 字 ワ ー フ プロ ユ ニッ ト 」SKW-01 は 、
JIS 第 | 水準 を 含む 3564 文 字 種 内 蔵 に
加え 、 特殊 文字 や 記号 の 作成 ・ 登 録 、
吾 語 や 短文 の 登録 も 可能 で 、 こ れ ら は
党 字 ワー フロ ユニ ッ ト
SKW-01 \49.800
(YIS 503 303 は 直接 、 各 社
製品 に は UCN-01 を 介し て
接続 する こと が で きま す )
電源 OFF で も 消え ませ ん 。 テ キス ト 表
示 と レイ アウ ト 表 示 を 切換 えな が ら 、
楽し く ス ピー ディ に 入力 / 編集 が で き
ます 。 作成 文書 は 、 カ セッ ト や デー タ
メモ リカ ー ト リッ ジ ( 容 量 4KB) で 記憶 ・
読出 し が 可能 。 手軽 で 本 格 的 な ホー
ム & パ ー ソ ナル ワー プロ の 誕生 で す 。
デー タメ モリ カー トリ ッ ジ
UDC-0| \9.800
El 刷 を する に は 。 YRM-16
SKW-0I と 併用 し て 、MSX を 漢字 住所
録 と し て 使う た め の 応 用 ソフ ト で 、 任意
の 項目 で の 並べ 替え や 検索 も ス ヒ ー デ ィ 。
死 名 ラベ ル や ハガキ な ど に 直接 宛名 E
刷 す る こと が で き 、 実 に 便利 で す 。
潤 字 住所 録
YRM-16 \7.800
ユニ ッ ト コ ネ ク タ
UCN-01| \7.800
圏 MSX 仕 様 の ソノ フト や 周辺 機器 すべ て に 対応 。
y (通常 の カー トリ ッ ジ スロ ッ ト 、(② 独 自 の サイ ド
スロ ッ ト 、(③ リ アス ロッ ト 、 と 3 種類 の スロ ッ ト を
凌 備 し て 拡張 性 断然 。 了 必要 十分 の RAM32KB
実装 。 プリ ンタ ボー ト も 装備 。 上 位 バ ー ジ ョ
ン VDP で 色 ズ レ の な い 鮮 明 高 画質 画面 。y 使い
易い キー 配置 の ステ ッ プ スカ ルプ チャ ー キ ー ボ ー ド
ホー ム り パー ソン チル ヨン ピュ ー タ
らち ョ 昌 コ
\64,.800
/
/
ME1IF
\49.800
一 MSX 仕 様 の 豊富 な ソフ ト が 楽し め ま す 。y だ
か ら 、 カ ー ト リッ ジ ポ ン で 誰 も が 楽し め る ゲー ム
マシ ン に 。 「 グ ラフ ィ ッ ク 」 も 「 教育 」 も 0K。y その
上 で 、 ヤ マハ 独自 の 「 サ イド スロ ッ ト 」 を 装備 し て 、
ヤマ ハ な ら で は の 「 ミ ュー ジッ ク 」 や 「 ワ ー プ ロ 」 な
と の 拡張 ユニ ッ ト を ダイ レク ト に 接続 可能 。y 強
力 な 拡張 性 で 楽し み も 実用 性 も 広がり ます 。
圏 資料 請求 は 〒430-91 浜 松 市 浜松 郵便 局 私 書 箱 3 号 日 本 楽器 製造 株 式 会 社 AY_XF 増 係 まで
この ペー ジ 、 市 馬 告 じ
到 掲載 作品 を 2 し < So シェ ガ
= ニー ニー ント ト 掲載 作品 の で す 。 う 一 ん 、 き
カフー で の を 語 じ て し ェ ミ 2
【 こ zorro) いい @ いい
FM-/ テコ ズル バズ ル
1 画面 の 超 ム ズム ズバ パズル を 、 な ん と で ぶ 大 先生 が 真 向 唐 竹 割り (な
ん の こっ ちゃ ) グン と パー ジョ ン ア ッ プ し た うえ に 、 あま っ て 、
PC-8001、PC-6001、X 1 、MSX に 移植 まで し て し まっ た !! 1
画面 だ か ら 、 ぜ ひ 以 上 の 機種 の ユー ザー 諸君 は 打ち 込ん で み
る べし 1! 中 6 ペ ー ジ
人 ドッ ト を 画面 の 内 側 に キー プ す る シン
プル ゲー ム 。 ム ズ い ぞ / 貴 13 ペ ー ジ 。
ら IAR WARHS FIGHT
食
に へ さぶ で さこ 還 國
ささ ーー 時 苦 薄 一 せ
お まわ りさ ん か ら 隠 れつ つ 、
較 粒 サラ金 の 借金 を か えす べく お
H | 金 を ひろ いま くれ 貴 24 ペー ジ
上 oe
33 3 33 3
9 33 つづ 4 3
3 2 3
さぐる おお ああ きる さ すす さき すさみ
ロ お )
日 は い に は 1「4
FIHE BUG
0 人 4 スタ ー ウ ォ ー ス の 感激 を 常連 投稿 少年 が 全力 を か
つら 、 再現 ! と まで は いか な い た むけ て 作り あげ た ニュ ー
内
内
仙
ひ
合
合
さ
に
す
けど exciting 叶 18 ペ ー ジ タイ プ ゲ ー ム 貴 20 ペ ー ジ NR
BSBS ら ほら ほほ
一 き 理 マメ 2 テ 9
前 の 界 己 豆 ざ は 対 史 管 叶 人
ツー みゆ 和 さ の 0 人 J 圧 演
T
9 エ //
ビン
ア
NN
お むしゃむしゃ
すばやい 瑞 を ワー
プ で か わし 、 ひ た す
ら ド ッ ト を 食い まく
る の だ 中 26 ペ ー ジ
ドー ン 、 ズ ドー ン 。 わ が 基地 に
上 陸 し よう と する 敵 の 船 を 大 砲 で
撃沈 せよ ! 貴 30 ペ ー ジ
ご
の の だ ZIA7
の と /77 ア アビ
PPN は まそ で 更生 れこ こる て
いい
還 Aooe
ANTNYS
LOAD
「 また Device
|/O Error。 妨害 信号 を や っ
つけ ろ 38 ベ ー ジ
し すま ます 本 VI 1 旧 條 AR 区
"へ Mg の PF \ YUJI GAME
ツー メ 届 午 さ こ ロ び 疾
ュー ミイ SW エド ー ボ iT 人
AE の KR や PART ]
KK \ FARTI |
2
( ce 全 タ コ が YUJI MAN を 追い か ける 。 オ レン
ジ 食 べ て 高 得点 42 ペ ー ジ
クラ ス ホ ッ パー VB. キャ ノン ボー ル
二 暫 7:BATTLE SHF
padECoRE929Se
ツー > を
ヽ JJ へ 層 ワー の のび
て
ン ン /
kd
「 ア 2
ン
|
々 Z
交 へ Ok 半 る 避 況
の 中 慎 洛 び 器 人 る
こい
連
ツー > あお 征 ビ ー
中 < 必 NV / で
J9 サ 生 層 S
4 上 か ら は 戦闘 機 、 下
か ら は 潜水 勝 が 攻め て
くる / 叶 49 ペ ベー ジ
ペタ ジャンケン ボン !
で 戦い あう 、 ス ペー
スズ ス ュ ジョー デ ティッ ク
ゲー ム の ニュ ー タ イ
還 フ ノ 叶 52 ペ ー ジ
ツー > 球 答 ー ご 団 國 ー
NGOoOOoe YS こさ
つ
NINN) 。 層 腔 軸 友 ー いい 居 人 る
人 る 月 れ お ち る 床
を 跳び まわ っ て
金閣 を ひろ え !
これ で も 1 画面
55 ペ ー ジ
どど NE. で G マ ラフ
わら mnGE う
人 A ム モビ ルス ー ツ 軍団 が
画面 いっ ぱい に 迫っ て
くる 。 彫 準 あ わせ て ビ
ー ム 発射 唆 60 ベ ペー ジ
W ハイ バー 感覚 で キ
De _s69 5/ 090000OOW あ ひつ / @@ 較 を Ra く うつ な ひび き
半生 ゲー ム 。 ひ と り で も
TUNRHIKI OLYMPIC 1984 Ra り で も 楽 し め る
ぞ m72 ペ ー ジ
00000 00000
朗 ぶ > うふ ょ 短 放 々 の な スイ な て 4
の ビラ ミッ ド を
思い 出さ せる 戦
場 で ミサ イル 同
ー こ 士 の 追い か け ご
HOLE ファ 8 | MslLE ATTACK
な ん と この 画面 は 、 マグ ニチ ュー ド 7 で
ブル ブル 揺れ て いる の だ 叶 73 ペ ー ジ
内
HH
FLLFTLHLHT
HHULHLHHL
HH
[ 5
HH
FLHF HHHTHHH -
HHHHT
剛 。 克 Y 避 引 装 S 画 寺 その の
ese ケ エー エーHIIS き che サー ミロ ツ 違
FT
ツー ん で 午 と すき 石 沈 江 対人 は 蛋 こ
6+
ツー 268 符 ぶせ さき は きす へ の 》
悪評 山下 直ぐ は は て 評
VH で *% す ず 還 ー は と すず ( (人
PB-100 で パチ ンコ が で きる ! 7 が 3 つ そ ろ
っ た ら 打 ち 止 め 確実 の スリ ー セ ブン ・ フ ィ ー バ
ー 型 の PB- パ チン コ だ 中 88 ペ ー ジ
ツー な 午 ドー
YYー で の て 葉
状 天 S ご 党 和 コーロ YY
へ で ヾ 三 党 りー ゴヤ
対応 機種 が ひと 目 で わか る で 9 ぐ て レ /mw
田 HUNRHUN 湾 削 教室 "テコ ズル パズル FM-7/ NEW7/7 ア 7……… 6
特設 移植 コー ナー 久 PC-8OO ImkII /88OImk IL 供 PC-6OO 1mkII/66O1@X1(CD) 信 MSX
田 機 種別 入賞 プロ グラ CCCCCPPPPYCPPPPPCYCPPPPEECCEEEYYSFCS で て て で まさ エ エメ ミミ よさ エ メメ ミナ た 7 ツ
PC-8OO1
PC-6OO1 PC-6OO1mkII PC-66O1
F M-77
1 「
ミ
MZ-7OO シ リー ズ
。 | 較 uz-2ooo/2zoo MZ-8OB
_ | 較 JR-oo
で て 大
1 PF
べ コ
直
WV
ロ
|
N
NN
| と
GE
| | の
こ
の
ロ
PC- 15OO/ 1501
PB- 1 1O/2OO/30O/4OO/41O
F X-7OOP/71OP/72OP/8O2P
マ
0
6
十
\e)
リ
画 特報 ! ゲー ム か か ん た ん に 作れ る 賠 法 の RUM カ ー ト リッ ツ (MSX) が 出る ぞ / …… の 3
圏 キ ミ の 作品 お 便り 募集 ? …… 大 ……ー ド ドド ーー Og
テコ ズル パズル (添削 前 ) の 遊び 方
その ムズ さ で に
編集 部 は まい っ た /
スペ ー ス ・ キ ー で ゲー ム ス タ ー ト 。
画面 の 四角 の な か に 現れ る 重なっ た 文
補 を あて で る と いう パズル 。 2 つの 廊 学
が 重なる と 、 重 な っ た 部 分 が 反転 し て
し まい 、 ちょ っ ら と 見 た だ は で は わけ が
わか ら な い の だ 。
レベ ル は 1 か ら ほ と ん ど と 無制限 に 設
定 さ れる 。 レ ベル 1 で 1 文字 表示 ( こ
れ は パズル に な ら な し り 、 レ ベル 2 で 2
文字 が 画 な っ で で て くる 。 つま り 、 レ
ベル の 数 だ け 文 字 が 重複 し て 表示 され
どん どん 岩 し く な っ て いく の だ 。
これ だ / と 思っ た 文字 の キー を 押
す と 、 そ の 文字 の 形 が 反転 する よう に
6
か つの いる の で 、 あ た だ っ て い だ 司 その
文字 の 形 だ けが 画面 か ら 消 える わけ 。
GS も お 。 お まう つき を し て し まっ だ ら 、
の 文字 も 画面 に 重なっ て 、 ま すま すわ
けが わか ら な く な る の で くれ で ぐれ も お
手つき だ け は 慎重 に 。 お 手つき し た な
と 思っ た ら 、 す で ぐ もう一度 同じ キー を
押せ ば 、 も と に も どる よ 。
1 守 1 宇 、 ひっ うっ ぺ が し て い ぐ よ うに
解い て いっ て 、 画 面 に な に も な く な っ
た ら 完 成 。 レ ベル に 応じ て 、 完成 時 の
コメ ント が 表示 され る 。 レ ベル 1 な ら
ナチ ナ ャ ノコ サイ ザイ レベ バル]11ME
な ら カミ ホ ポト ケ デ ス !!“ と いう 成 じ 。
レベ ル 3 く らい な ら な ん と が で き な
いで も が いけ ば けど 、4 く らい に な る と も
うほ と ん ど お 手 あげ 状態 。 で も 、 作 者
は レベ ル 6 を 解い た そう だ か ら 、 さ す
が に 製作 者 は ちがう 。
イコ ン 礎 1 年
REM @e@e@@ By AKIRA .FUJINAKA @@@@@
DIM A$(11):FOR Il=9 TO 11:READ A$(1T):NEXT
DATA アタ リマ エ タ ~ ヨ , オ チャ ノコ サイ サイ , マ ア マ ア 。 タダ " ネ 。 ス コ " イ !
1「。GOOD !
の だ ZH ル 7
の と /7 戸 了 ア 7
ロイ チー スネ ニッ シフ ウサ イー )
DATA ホ ト ン ト ~ ヒ ~ ヨウ キ , テン サイ テ ~ ス ! , ヘン タイ タ ~ ナ 7? 。 キ チカ ^ イ カモ ネ ! ! 。 カ ミホ ト ケ デ “ ス !!
WIDTH49,25:COLOR7,9:LINE(9,9)-(649,299) ,PSET , 2 ,BF
SYMBOL( 69 , 3 ) , "テコ スル スル" 6.5,5:SYMBOL(59,29) 、 "テコ バル ルリ スル "6,5,6
LOCATE11,15:PRINT "HIT SPACE KEY":K$=INKEY も : IF K$="
" THEN89 ELSE 79
CLS:T=T+1:LOCATE19,1:INPUT "レベ ドル ハイ クツ こ シマ スカ "5AERANDOMIZE TIME/T
LINE(13,5)-(25,17)," 較 "J、5,B:FOR I=1 TO A:B=INT(RND(10 ) \※222+32 )
SYMBOL( 239 ,55 ) ,CHR$(B) ,29,19,4,,XOR:FOR W=9 TO 50:NEXT:NEXT
TIME$="99:99:99":LOCATE 13.3:PRINT "TIME=“
K$=INKEY$: R=RND( 1 ) x*39+19:PLAY"T255L15N=R:":LOCATE 19.3:PRINT TIME$
FOR X=239+19 TO 399 STEP 29:FOR Y=55+5 TO 134 STEP 19
IF POINT(X.Y)=-1 THEN 169
IF X=389 AND Y=139 AND POINT(389,139)=9 THEN 179 ELSE NEXT:NEXT
SYMBOL(239 ,55) ,K$ も 29、19,4,,XOR:GOTO0129
PLAY"S8t159115o5cdefcdefcccrfgbafgbafff"
IF A<9 THEN A=9 ELSE IF A>11 THEN A=1ll
SYMBOL(183.159) ,A$(A) ,4.2.5
SYMBOL(182,149) ,A$(A),4.2.7:LOCATE13.22:PRINT"Replay 2 (Y/ZN}「
A$=INKEY$:IFA$="Y"ORA$= "y "THEN59ELSEIFA$="N"ORA$="n"THENENDELSE209
テコ ズル パズル (添削 前 ) プ ログ ラム 解説
田 変 数 リス ト 90
A$()…… コ メン ト 表 示 用 。A や : 30 40
(1) な ら レ ベル 1 用 の コ ・ 50- 70
メン ト 、A$S (0) な ら : 80
レベ ル 11 以 上 用 の コメ : 90-100
ント が 入る 5
Ao レベ ル 。 ご の 数 に よっ つて *
重ね あわ せる 文字 の 数 を :
決め る ・
田 プ ロブ ラム ハム の 説明
10 REM 文
デー タ 読 み 込み る 120 行 へ も どる
デー タ ( コ メン ト ) : 110 TIME 初 期 設定 と 表 : 170 完成 時 の BGM
デモ 画面 作成 示 ・ 180 コメ ント を O 〇 <11 ま
レベ ル 入 力 :・ 120 キー 入力 、BGM、 か ・ で し が ガ 用意 し て な い
レベ ル 数 に 応じ て 文 ・ か つ だ 時 間 の 表示 ・ の で 、 そ れ を 越え る
字 を SYMBOL 文 で : 130~-150 枠 の な ガ に まだ 文字 ・ レベ ル だ つ だ 場合 に
重ね あわ せ 表 示 。 1 : が 残っ て いれ ば 160 行 : 備え て 、A の 値 を O
文 ず つ を 多少 ゆ つ : へ 。 何 も な けれ ば 170 11 に 制限
の 表示 し で ぐま 行 へ ・ 181190 レベ ル に あわ せ だ ただ コ
うに W を 使っ た カラ ・ 160 押さ れ だ キー の 文字 ・ メン ト 表 示
ルー プ を 利用 し て い ・ を 枠 の な ガ に 表示 し 、・ 200 りり 芝 レイ 久 連
頭 の 健康 の た め レ ベル の
編集 部 で 悪戦 苦闘 し た か ら ケ チ を つ
ける わけ で は な いけ れ ど 、 レ ベル が 無
制限 に ある の は どう か な と 思う 。
SO0 と か 1 と が 、 こ は まる に
コメ ント の と お り 、 人 間 技 で は で き な
いと 思う 。 で も 、 レ ベル は 無制限 に あ
る お あけ て 、 で こま て いっ て も 「 や っ た
ぞ 、 お れ は この パズル を 征服 し た /」
と いう 油 足 感 が 得 ら れ な い 。 と な る と 、
な か に は 八 求 不満 と パズル の や りす ぎ
で 頭 の 回 路 が フッ と びそ うに な る 人 が
出 て くる か も 。
ここ は や っ ぱり 、 人 間 に 可 能 な レベ
CM ま にし で 失い だ は ほう が 、 いと 介
う な 。 そ れ に 、 た だ た だ の 数 字 よ り も レベ
ル に 名 前 を つけ て は どう だ ろう 。 を こ
て 、 こ ん な ょ うに 制限 し て みた 。
@ 初級 一 一 2 文字 の 重ね あわ せ
@ 中 級 一 一 3 文字 の 重ね あわ せ
@ 上 級 一 一 4 文字 の 重ね あわ せ
@ ブロ ーーー 6 文字 の 重ね あわ せ
こん な ふう に する の は か ん た だ ん 。 添
削 後 リ スト の 20 行 と 90 行 で や っ て いる
こと を 抜き 出し て みる と 、QL() に 難
易 度 (文字 の 重ね あわ せ 数 )、QT$()
に レベ ル の 名 称 を 読む こと に し て 、
①DIM QL(4),QT$(4)
(2)EOR 上 二 1 す 10 4
③READ QL),QT$ ⑪)
④NEXT
( 丸 囲 み 数 字 は 仮 の 行 番号
る MAC LC うつ 0L(4) に 、 2 8、
4 、 6 が 読み 込ま れ 、QT$(1) 一 QT
あん 49 に キュ ユウ チョ ュ ン キュ ツウ“
* ジ ョ ウキ ュ ウ パブロ” の レベ ル 名 が 読
み 込 まれ る わけ だ (デー タ 文 が 必要 ) 。
た だ し 、 流 削 後 リス ト で は 、 1 画面 に
お さる さめ る た だ め に 配列 宣言 を 省略 し た 。
も の くん な る と まし な い
時
Z
膝 中 くん の プロ グラ ム で は 、 問 題 を
90 行 で B=INT (RND(10) *222 十 32)
と し て お いて 、100 行 の CHR $ (B) て
次 々 に キャ ラク タ を 出す よう
いる 。
これ で は 、 最 初 に 設定 され た 問題 が
火 々 に 肖 え て し まう わり で て 、 ギ フチ ッ
プ し て 答え を 知 ろ うに も 、' 答 え は どこ
SO2009028BIL の SO に の
そ 和 に 、 こ れ で は CHR$ (32) か ら
CHR $ (253) まで の 222 個 も の キャ ラ
クタ を 使う こと に な っ て 、 ち ょ っ と 上 黄
し すぎ る 原因 に も な っ て いる 。 ま た 、
2 つの 同じ キャラ クタ が 問題 の な か に
入り こん で し まう 可能 性 も ある の だ 。
を そこ で 、 ま ず 、 英 数 字 十 記号 の モー
ド と カタ カナ ・ モ ー ド に 分 け て みた 。
プレイヤー は 、 ゲ ー ム の 最初 に どちら
か の モー ド を 選択 し 、 1 回 の パズル で
は その モー ド の キャ ラク タ し か 使わ れ
時 46 2
て お け ば 、 超 区 解 な グラ フィ ッ ク キ ャ
0 と も な いし
ね (も っ と も サド 趣味 の 人 は お 好き に
と どうぞ )。
英 数 字 十 記号 モー ド は 0 一 9:: く テッ >
7 @A-Z[\ の 45 個 と し て これ を Q$
(0 ) に 格納 、 カ タカ ナ モ ー ド は アー ン
の 45 個 で Q$ (1 ) に 格納 し て お こう 。
を のだめ の プロ グラ ム は 次 の と お り 。
①DIM Q$(1),Q(3)
に な っ て
ギブ アッ プ し レ た 人 に は
韻 え を 教え て あげ た い
②Q( 0 ) 48: Q(1)
:Q(3)=221
(⑱EOR.J 圭 0 TO 1
〈④FOR 1=Q (J *2) TO Q(J *2 十 1)
⑥⑤Q⑩$ 9) =Q$ JJ) 填 CHR $ (1)
⑥NEXT 1,J
これ CO (0) に は 美 数 字 上 記号 が 、
Q$(1) に は カタ カナ が 、 それ ぞ れ 順
序 上 正しく な らん が だ 文字 列 と し て 入っ て
いる 。
火 に 、 こ の 文字 列 の 並び カカ を バラ バ
2 し ウッ の あの 6n ポッ メグ ク の シッ
移 必 グル す る よう な 感 。 この ルー デー チ
ン は 他 で も いろ いろ 使え る よ 。
①FOR J テ 0 TO 1
②FOR エ = テ 1 TO 100
③R 1=INT (RND(1) *44) 十 1: R 2
=ーINT (RND( 1) *44) 十 1
〈④N $ = テニ MID$ (Q$ ( す ), R 1 ,1)
⑤MID $ (Q $ け ), R1, 1) =MID $ (Q
$ け J), R2, 1)
⑥MID $ (Q⑳$ け ), R2, 1) ニ N$
⑦NEXT 1,J
これ で 、 N$ を 一 時 待避 場所 に し て
が シャ ガ シ ャ と EQ$(0),Q$(1) の 中
身 が シャ ッ フ ル さ れ だ た こと に な る 。
さて 、 間 題 作 り だ 。 問題 を 入れ て お
〈 変数 も 、 ち ょ っ と まぎらわしい か な
と も 思っ だ けど N$ に し て お いた 。
と の 文字 数 (2、3、4、6) を
ー92: Q(2 ) 三 177
レッ ベル ご こ
その 都度
LEV と いう 変数 に 入れ いて 、
LEV の 数 だ け 、 バ ラバ ラ に な っ だ Q$
(0).Q$(1) の 文字 列 か ら 抜き 出す こ
と に し だ つまり 次 の よう に ず すま
いい わけ だ 。M は モー ド で 0 が 英 数 字 、
0 の 0 た に ( の 2
N$ = テーMID$(Q$(M), (INT (RND
( 1 )*44)*(45 一 LEV) ) \44 十 1LEV)
の PU は 2 クッパ パラ に WAC だ 火 学
列 か が ら ラ ンダ ム に レベ ル で 必要 な 文字
を 選び 出し て くれ る わけ が だ 。
肖 趣 を 画面 に 表示 する と き に は 、 こ
の N $ か ら 1 字 ず つ 取 り 出 せ ば いい わ
け だ し 、 ギ ブ ア ッ プ で 答え を 表示 する
と きも この N $ を 使う こと が で きる っ
て わけ
ちな み に 、 ギ プア ッ プ ・ キ ー は [PFi ]
に 設定 し て お いた 。 キー を 押す と 、 ザ
ツネ ホン よ 出 て 、1 字 ずつ 表示 し て く
れる の だ 。 こ の 処理 は 流 削 後 の リ スト
80 行 で や っ て いる 。
も と の ブロ グラ みて は 、 リ ラ レ イ す
る と き に 、 い ちい ち 初 期 画面 に も どっ
て し まっ て 、 の その を そ と 出 て くる デモ
画面 を 何 度 も 見 な くち ゃ いけ な い 。 こ
れ じ ゃ ちょ っ と 退屈 な の で 、 リ プレ イ
時 の も と り 先 を 調節 し た いも の 。
常に ディ スプ レイ され て いる 基本 画
ざ
面 を 作っ て お いて 、 リ プレ イ の た だ びに
eo e の ポス だ し た に 。
さき 和 な ら 、 リア レイ に し て も 。、 逢 が
その まま 残っ て 、 そ の 下 で モー ド と レ
ベル の 設定 が で きる わけ が だ 。
まだ 、 コ メン ト が レベ ル に よっ て 変
わる の は いい の だ けれ ど 、 は や く 完 成
し て も お そく 〈 完 成 し て も 、
同じ だ っ て いう の も マズ い 。
や っ ぱり 、 か か っ た だ 時 間 に よ っ て コ
メン ト や を 突 え る べき だ ね 。
そこ で 、 も と の リス ト に あっ た コメ
ント か ら 8 つ 抜き 出し て 、 時 間 に 応 じ
だ ラメ ント に 交 ん え で みた 。 し か も 、 た だ
コメ ント が
と えば 初級 レベ ル で の 5 秒 と プロ レベ
ル で の 5 秒 は 価値 が 違う わけ だ か ら 、
を の 点 も 考え に 入れ た 。
この 処理 は 60 行 と 70 行 の 変数 MN が
員 C く る だ る の て 人 有る て そい 2。 る まみ 、
MN は 、 完 成す る の に か か っ た だ 時間 を
8 つの クラ ス に 分 ける だ め の 変 数 と い
フ 007 で 5
60 行 の MN=LEV*2 一 (T\(2 へ LE
V) ) の 式 は 、 か か っ た 時 間 (T) を 2 の
LEV 乗 て 割り 9、LEV の 2 倍 か ら 6 引く と
いう も の だ けれ ど 、 こ れ に は ある い は
異論 が 出る か も し れ な い 。 ま 、 好 み に
よっ つ で 6 究 えて の て ちょ うだ い 。
た だ 、 こ うし て お け ば 、 初 級 レ ベル
て と どん な に 早 て 完成 した っ て ! カ ミホ
ト ケ デ ス ! 」 な ん て 最上 級 の メッ セー
ジ は 出 な いわ け で 、 か な り 感 覚 的 に は
能 も い 制 導 に ひら て る 。 枯 う けり と ん 。
120 り 2 0 の
最短 時 間 記 録 を 入れ た ら
1 画面 を 越え こ て し まっ つた /
25 FORI=9TO7:HI(I)=9999:NEXT:GOSUB199
65 IFT く HI (MxX4+L-1 )THENHI (MX4+L-1)=T:GOSUB119
199 LH(9)=1:LH(1)=27:LOCATE 1.5:PRINT
"iLOCATE 3,6:PRINT "ペスト タイ ム " ELOCATE 28.6:PRINT
119 FORI=9TO3:FORJ=9TO1:LOCATELH(J) , IX2+18:PRINTUSING"&
H(J) 、IX2+9:PRINTUSING" 提 提 井 寺 拓 SeC"iHI(I+JX4):NEXTJ,T:RETURN
ホン ト は 添削 4 に し た か っ た けど 、
どう し て も 1 画面 に 入ら な い の だ 。 こ
れ で ひと 晩 、 頭 を 悩ま せ た け ど 、 つ い
に ポア ッ ク 。 の マク と いう ざと た し
の 60
と いう わけ で 、 1 画面 の な か に は 入
りき ら な いけ ど 、 最 短 時 間 記 録 を 各 モ
ー ド 、 各 レベ ル で 残す た め の プ ログ ラ
エイ スウ シャ モー トー "LOCATE 20、5:PRINT “カク > モード“
トド と 1 ム
ム を 作っ て みた 。
添削 後 の リ スト に 加え て 、 下 の リス
ト を 打ち こん で ほしい 。 こ れ を 実行 す
る と 、 基 本 画面 の 両側 に 、 ズ ラッ と 最
短 時 間 記 録 が 表示 され る よう に し た 。
で も , 最短 時 間 達 成 者 へ の メッ セー
ジ は な い の で 、 は ほし い 人 は 適当 に つけ
加え て みよ う 。
&" iQT も (T+1):LOCATEL
その ほか 、 添 前 担当 で ぶ 先 生 の …… ご 2S3 記
プロ グラ ハム の 説明 は 、 本 文 を 読ん で
も ら う こと と し て 、 い い 大 し だ こと を
し SS つ ガ 。
太 時 間 の 表示 の 部 分 、 ち よ つ と アル ゴ
「 リ リズ ハ を 変え て みた だ 。 も と の プロ グラ
ム へ で は キー 入力 ガ びあ つて 正解 ひご うか が
を 判断 し て か ら 時 間 を 表示 し て いる け
れ ど 、 ご これ だ と 人 間 の 考え て いる 時 間
避 吉 也 て 。 コン ピュ コ ュー タ の 考え で いる
時 間 ま で が 所 用 時 間 に 入 つて し まう つう 。
そこ ご で 、 キ ー 入 力 の 直後 に 、
T お = TIME お
と し て お いて 、 正 解 ひ ご どう か が の 判断
が 終わ つて か がら 、
TIME お = T や
ご いつ クル 当り の に し た 。
央 の くる モー に に に 多 け だ の だ 才 ら 、
関係 な い キ ー は 受け つけ だ こない 。 そ
で キー 導 及 が あつ だ た だら 、 人 人力 キ ャ ラ
クタ の 制限 内 ひど うか ガチ エッ ツク し て 、
制限 外 な ら 受 けつ け な い よう に 変え て
あい だ 。
廊 添削 後 | リス ト の 10 行 目 。CLEAR300
と し を の は 、 ど ん な プロ グラ ハム で も 必
ざ ず ク リア を 付け る べき だ / と いう 信
菅 の だ め 。DEFINT A-Z は 、 実行 束
度 を 速く ご する だ めで これ も 当然 。D ヒ F
FNR=RNDC41.) * 44 は 、 し よ つ ち ゆう
合う この 式 を 、 コ コー ジー シィ ァ ン 2 と
に 定義 し て いる の だ けれ ど 、 ご これ も 常識 。
それ か ら 、 乱 数 系 列 の 指定 は 、! リ スト
の よう に RANDOMIZE TIME で 十分 。
廊 20 行 目 、 配 列 を 宣言 し こない けれ ど 、
どう し て も / と いう 場合 は 宣言 し な
ぐ て も いい 。 ご の 場合 は 、 リ スズ スト を W
IDTH80 の 画面 に お さめ る だ め 、 ど う
ク
し て も / の 場合 だ つた の だ 。
雪 30 行 目 の WHILE を 使 つ だ 部 分 。 ご
の よう に する と 、|F 文 で 2 行か か る ご
と が 1 行 で で きる の だ 。 WHILE 一 W
END を 活用 し よう /
太 と いう と ころ で 、 主 お 変数 リス ト を
災 で 説明 し て お こう 。
AS(O) 一 AS(9) …… コ メン ト 、AS
'(9) は ギブ アッ プ の と き
CO(6) 一 (0 つ ( 3) や 竹 モ ー ド に お ける
- キャ ヤラ クマ コー ド の 制 眼 値 。 た と え
ば 、 〇 (O 〇 ) 一 O( 4 ) の あい だ に 英 数
字 十 記号 モー ド の アス キー コー ド の
値 び 入 つ て いる わけ だ
OL( 1 ) OL( 4) …… 各 レベ ル に 対
応 し だ 問題 の 重ね あわ せ 回 数
OT$( 1 ) OTS( 4)…… 各 レベ ル に
対応 し だ た 名称
OS( O). OS( 1 ) …… 各 モー ド で 使う
文字 列 が 入る 。 〇 は 英 数 字 十 記 号 、
1 は カタ カナ の モー ド
E$…… ゲ ー ム オー バー 時 の サウ ンド
デー タ
N$……OS( 〇 ) . OS( 1 ) の 中 身 を シ
ヤッ ツノ ル す る と きこ と 、 問 題 の 答え 格
納 用 に 使 つ て いる
_P$…… ゲ ー ム 中 の ラン ダム ノー ト
中 お や ダイ トル 格納 。 ゲ ー ム が スマ
ー ト する と 、 ダ イハ の 一 時 記 帖 用 に
使用 し て いる
SSD の 9 タイ ハム の 初期 値
MS(O), MS$( 1 ) …… 人 千 モ ー ド の 名 秋
MS ゲー ム 中 の モー ド
に WSese ゲー ム 中 の レベ ル ( 問題 の 重
ね あわ せ 回 数 な ど に 使用 )
IMN…" 表示 すべ き コ メン ト の 番号
19 CLEAR399:DEFINTA-Z:DEFFNR=RND( 1 ) x44:COLOR7 :WIDTH49,25:RANDOMIZET IME
<9 FORI=9T09:READA$(T ):NEXT:FORI=1T04:READQ( 1 -1) 、QL( 1 ) ,QT$ も (1) :NEXT :FORJ=9TO1 :FOR
1=Q(Jx2)TOQ(JX2+1 ) :Q$(J) =Q$(J)+CHR$( 1 ) :NEXTT ,J: READE$,P$,T$,S$:FORI=9TO1 : READM$(
1):SYMBOL(61-1,2-]) 、T$,6.5,5+1:NEXT:LINE(13.5)-(25,17) ,""、5.B:ONKEY( 1)GOSUB89
39 KEY(1)0FF:M=-1: し =-1:WHILEM く 90RM>1 : LOCATE5 , 29 : PRINT " ト ^ ッ チノ モー ト ~ テ *~ ヤル (9-1)7":M=V
AL(INPUT$(1)):WEND:PRINTTAB(16) :M$ も (M) :WHILEL く 10RL>4 :LOCATE6 , 22:PRINT "トト ノ レベ トルテ ~
ヤル (1-4)2 9: し =VAL(TNPUT$ も (1) ) :WEND:PRINTTAB( 16 ) :QT$(L) :LEV=QL(L) :LOCATE13,19
49 FORI=1TO199:R=FNR+1:S=FNR+ 1 : N$=MID$(Q$(M) ,R, 1 ) :MID$(Q$(M) 、R, 1) =MID$(Q$(M) ,S, 1
):MIDS(QS(M) .S, 1 ) =N$:NEXT :N$=MID$(Q$(M) ,(FNRx(45-LEV) )\44+1 ,LEV) : FORI =1TOLEV: SYM
BOL(239,55 ) ,MID$(N$ 1 ,1),29.19,.4,,XOR:NEXT :KEY(1)0N:TIME$=S$:PRINT "TIME=":P=- 1
59 WHILEP く 9:T$=" "EEWHILEASC(T$) く Q(Mx2)0RASC( 1$) >Q(Mx2+1 ) :LOCATE18,19:PRINTTIME$:
R1l=FNR+19:PLAYP$: 1T$=INKEY$+" ":WEND:T$=TIME$: SYMBOL(239 , 55 ) , 1$,29,19,4,,XOR:P=9:
FORX=240TO389STEP29:FORY=69TO139STEP19:P=P+POINT(X,Y) :NEXTY,X:TIME$=T$: WEND
69 LOCATE18.19:PRINTT$:PLAYE$:T=VAL(LEFT$(T$, 2 ) )x3699+VAL(MID$(T$,4,2) )x69+VAL(R
1GHT$(T$,2) ) :MN=LEVX2-(T\(2^LEV) ) : IFMN く 9THENMN=9ELSEIFMN >8THENMN=8
79 LINE(9,169)-(639,199) ,PSET , 9 ,BF: SYMBOL(183,179) ,A$(MN) , 4,2。5:SYMBOL(182,169) ,
A$(MN) ,4.2.7:LOCATE13,24:PRINT "モウ イチ ト ~ ヤル (Y/ZN)9" ji:T$=" の "EiWHILE1$ く >"N"ANDI$ く >"Y" : 1 る
=INKEYS:WEND: IFI$="Y"THENLINE(9,169 )-(639,199) ,PSET , 9 , BF : GOT039ELSEEND
899 KEY(1)OFF:PLAYE$:LINE(244,48)-(395,135) , PSET , 9 , BF:FORI=1TOLEV:FORJ=9TO1 : SYMBO
L(239,55 ) ,MID$S(N$ 。T,1) 29,19,4,,XOR:FORM=9T0999 : NEXTM, J , TI :MN=9 :RETURN76
99 DATA オチ ャ ノコ サイ サイ 。 マ アマ ア タ ^ ネ 。 ス コト イ ! 1 。 ス コイ テ ~ スネ ー 。 シュ ウサ イ タタ ~ | 。 テ ン サ イ タ ~ 1 。 ヘ ペン タイ タ * ナ ? 。 キ チカ ~ イ
- カ モネ! 。 カ ミホ ト ケ デース! 。 サ トン ネン ! 。48 2 。 シ ョ キュ ウ , 92 , 3 , チ ュ ウ キュ ウ , 177 、 4 ショ ウキ ュ ウ , 221 .6, フ ブロ,S8T159L150
SCDEFCDEFCCCRFGBAFGBAFFF , "T255L15N=R1 "テコ スル 7 スル, " 99: 99:99" , エ イス ウシ ヾ , カタ カナ
他 機 種 に は FM-7 の よう な SYMBO
L 文 が な が い の で 、 その か わり に 「 全 移
植 機種 用 追加 プロ グラ ム 」 を 加え て ほ
し い 。 こ の た め 、 1 画面 に は な ら な い
けれ ど 、 か ん べ ん し て よ 。 で も 、PC-
8001 版 と X-1 版 は 、 メ イン プロ グラ ム
部 分 だ け は 1 画面 に 入っ て いる の だ / ノ
た だ し 、 英 数 字 十 記号 モー ド の み に
し た (だ っ て 面倒 くさ いん だ も ん )。
REM Character pattern data (chr$(&h39 ) to chr$ も (&h5c) )
RESTORE 2949:1I=9
READ D$: IF D$ ゃ = "END" THEN RETURN
POKE ADD+ IT ,VAL("&H"+TD$ も ):T=T+1:GOTO 2929
DATA 3C,42.62.5A,.46.42.3C,99.19.18,.14.19,19,19,7C,99
DATA 3C,42.49.39.9C,92.7E,99.3C,42.49.38,49,.42.3C,99
DATA 29.39.28.24.7E,29.29.99,7E,92.1E,29.49,22.1C,99
DATA 38.94.92.3E,42.42.3C。99,7E, 42.29,19.98.98.098,099
DATA 3C,42.42.3C,42.42.3C,99, 3C,42.42.7C,49.29,1C,99
DATA 99.99.19.99.99,19.99.99,99.99,19.99.99,19,.19,098
DATA 79,18,9C,96.9C,18.79,99.99,99.7E,99,7E,99,.99,99
DATA 9E,18.39.69.39,18.9E,99,3C,42.49.39.98,99,98,.099
DATA 38.44.52.6A,.32.94.78,.99
DATA 18.24.42.7E,、42.42.42.99.3E,44.44.3C,44,44.3E,99
DATA 38.44.92.92.92.44.38.99。1E,24.44.44.44.24.1E,99
DATA 7F,91 91.3F,91 91.7F,99,7F,91 91.3F,91 ,91,.91.99
DATA 38.44.92.72.42.44.38.99,42.42.42.7E,42.42.42.99
DATA 38.19.19.19.19.19.38.99,79.29,29.29.29.22,.1C,99
DATA 42.22.12.9E、12.22.42.99,92.92.92.92.92.92.7E,99
DATA 42.66.5A,5A,42.42.42.99,42.46,4A,.52.62,.42.42,.099
DATA 18.24.42.42.42.24.18.99.3E,42.42.3E,92.92.92.。099
DATA 18.24.42.42.52.24.58.99.3E,42.42.3E,12.22.42.99
DATA 3C,42.92.3C。49。42.3C,99.7C,19.19,19,19,19.19,99
DATA 42.42.42.42.42.42.3C。99, 42.42.42.24.24.18,18,.99
DATA 42.42.42.5A,5A.66.42.99、42.42.24.18.24.42.42.09
DATA 44.44.44.38.19,19,19,99,7E,49,29,18.94.92,.7E,99
DATA 3C,94.94.94.94.94.3C,99,、44.44.28.7C,19,7C,19,099
DATA END
PC-8007,mk/77/8807,mk/7
(M- BAS/C)
英 数 字 十 記号 モー ド の み と い う 点 以
外 ほ ほとん だ 同じ 。 た だ 、 ギ キャラクタ
の 形 が よく わか ら な いと いう 人 の た め
に [|f・5 | キー に 全 キ ャ ラク タ ・ デ モ 機
能 を 入れ た 。 レ ベル 入力 し て か ら ゲ ー
ム オ ー バ ー ま で の あい だ な ら 、 い つ で
も この キー を 押す と 、 全 キャ ラク タ を
1 つ ず つ デ モン スト レー ショ ン し て く < く
れる の 0 だ キア アッ ク は ff-\
プロ グラ ム 的 に は これ と いっ た 技 を
使っ て いな い 。SYMBOL 文 を マシ ン
語 (USR) に し た くら い 。A テ USR(AS
CC 0”)) と や る と A に 枠 の な か の 田 の
個数 が 入る の で 、 こ れ を 使っ て 終了 か
どう か の 判断 を し て いる 。 ち な み に 、
USR 1 は 小文字 か ら 大 文字 に 変換 し て
くれ る サブ ルー チン 。
これ で CAPS LOCK | を 不要 に し た 。
PC-6007nk77/6607
( 導 。M6OBAS/C)
移植 に 最も 苦痛 し た 。 や っ ぱり 下位
機種 へ の 移植 は 導 れ る 。 ギ ブ ア ッ プ は
| RETURN キ ー。 タイ ム の 表示 は 秘 数 に
し た 。 [CAPS LOCK は 不要 。
X』(C, D)
2 が プ 08 こ SL し また 、 じ る ルル 和信
玉 の と どき に 、.0 を 入れ る と 人 光 キ ャ ラン
タ の デモ が 見 られ る 。
あの デー クタ が すず すっごく 長い の は 、
ゲー ム 中 の ラン ダム ノー ト を 出す た め
に PLAY 文中 で 変数 が 使え な いせ い 。
| CAPS LOCK 尋 。
ル 7 ら X
(VDP ア クセ ス は ちゃ ん と BIOS を 使
っ て まっ せ 、ASCII ち ゃ ん ! )
ギブ アッ プ は | RETURN キ 一 。 全 キャ
ラク タ の デモ は レベ ル 入 力 時 に 0 を 入
力 す れ ば いい 。USR 1 は キー 入力 バッ
ファ の クリ ア 用 。 [CAPS LOCK 苦 。
19 CLEAR399 , &HCFFF: DEFINTA-Z:DEFFNR=RND( 1 ) x44 :GOSUB99 : ADD=&HD959 :GOSUB2999:WIDTH
49 ,25:CONSOLE, , 9 , 1 :COLOR7 ,9.9:PRINTCHR$( 12) : RESTORE199:FORI=9T09:READA$( 1 ):NEXT:
FORI=1TO4 :READQL( 1 ) ,QT$(T):NEXT:FORI=48T092:Q$=Q$+CHR$S( 1]) :NEXT
29 DEFUSR= &HD999 : DEFUSR1 =&HD946 :LOCATE14,2:PRINT "テコ ズル ズル "ELINE(14,6)-(25,17
) " 較 ",5、B:LINE(15,7)-(24.16)、" "4.BF:LOCATE13,19:PRINT "TIME="
39 LINE(9,29)-(39,24),"",7。BF:LOCATE8 ,29:PRINT" ト ~ ノ し へ ^ ル テ ~ ヤル (1-4)27 8: し =VAL(INPUT
$(1) ):IFL く 10RL>4THEN39ELSEPRINTQT$(L) :LEV=QL(L )
49 FORI=1TO199:R=FNR+1 :S=FNR+ 1 : N$=MID$(Q$,R,1) :MID$(Q$,R,1)=MID$(Q$,S,1):MID$(Q$
.S, 1 ) =N$ : NEXT : N$=MID$(Q$ (FNRx( 45-LEV ) )\44+1 LEV) :FORI =1TOLEV:A=USR(ASC(MID$(N$,
1 ,1) ) ) : FORJ=9T049:NEXTJ,1:TIME$="99:99:99"
59 T$=TIME$:LOCATE18,19:PRINTT$ も :I=INP(9):IFI<>255THEN79ELSE1 =USR1(ASC(INKEY$+" 「
) ) : IFI<480RI >92THEN59ELSEA=USR( ! ) : IFA>9THEN59ELSEGOSUB89 :T=VAL(LEFT$(T$, 2 ) ) x3699
+VAL(MID$(T$,4.2) )x69+VAL(RIGHT$(T$,2 ) ) :MN=LEVw2-(T\(2^LEV) ) : IFMN >8THENMN=8
69 MN=(MN<9 ) xMN+MN: LOCATE13.22:PRINTA$(MN) :LOCATE13,24:PRINT "モウ イチ ト ~ ヤル (YZN)2 リ 5:1
$=INPUT$(1):IFI$="Y"ORI$="y"THEN39ELSEEND
7 LINE(16,8)-(23.15),"",4,BF: IF1=253THENGOSUB89:FORI=1TOLEV: FORJ=9TO1:A=USR(ASC
(MID$(N$, 1 ,1) ) ) : FORM=9T0999 : NEXTM,J, ! :MN=9:GOTO069ELSEFORI=48T092:FORJ=9TO1:A=USR
(1! ) :FORM=9T0499:NEXTM,J。T:GOTO39
89 FORI=55TO1STEP- 1 : BEEP1 : FORJ=9TOI : NEXT : BEEP9 : NEXT : RETURN
99 READD$:FOR1=9TO75:POKE&HD999+ 1 ,VAL("&H"+MID$(D$,T*2+1.2) ) :NEXT:RETURN:DATA ES
DD2E997ED639219999444F992929299159D99911E2F6DD26987E96989F9E9939929E87F51AA92892
DD2C12F1131319EC23E521689919EBE1DD2529DDE1DD7D772336992BC97ECDC15F77C9
199 DATA オチ ャ ノコ サイ サイ , マ アマ ア タ ~ ネ , ス コト イ ! 1 、 ス コ ~ イ テ ~ スネ ー 。 シ ュ ウ サイ タ ~ |! 。 テ ン サ イ タ ~ 1 。 ヘ ペン タイ タナ 9 。 キ チカ イ
カモ ネ ! , カ ミホ ト サ テ ^ ス ! , サ トン ネン ! 。2 ショ キュ ウ , 3 , チュ ウキ ュ ウ , 4 。 シヨ ウキ ラウ, 6 プロ
19 CLEAR399 , &HDFFF : DEFFNR(D)=INT(RND( 1 )x44):DEFFNT(D)=INT(TIME/1924 )
29 GOSUB1999:ADD=&HE969 : GOSUB2999 : SYM=&HE999 : し 2U=&HE945:PA=&HE944
39 MG=&HE209:SCREEN2 、 1 , 1 :CONSOLE , 、9:CLS
49 RESTORE599 :FORI=9T09: READA$(』) :NEXT:FORI=1T04:READQL( 【 ) ,QT$( 1) :NEXT
45 READE$
59 FORI=9T044:POKEMG+ 1 ,1+48:NEXT:LINE(95,24)-(169,136) ,6,B
69 LOCATE19,9:PRINT "テコ ス ^ ル ハス ズール":LOCATE11.12:PRINT "TIME="
79 LINE(9,169)-(256.192),9,BF:LOCATE5,13:PRINT" ト に ノ レベ ~ ル テ ~
89 I$=INKEY$:IFI$ く "1"0RI も >"4"THEN89
99 L=VAL(1$):PRINTQT も (し L) :LEV=QL(L )
199 FORI=1TO199:R=FNR(9)+1:S=FNR(9)+1:N=PEEK(MG+R )
119 POKEMG+R . PEEK(MG+S ) : POKEMG+S , N : NEXT
129 N=INT((FNR(9)\(45-LEV) ) /44 )
139 FORI=1TOLEV: POKEPA , PEEK (MG+N+ 1 ) : EXECSYM:FORJ=9T049:NEXTJ, 1
149 FORI=9TO03:POKE&HFA28+I,.9:NEXT
159 T=FNT(9):LOCATE16.12:PRINTT:1$=INKEY$+" "ETIFASC( 1 も )=13THEN399
169 POKEPA,ASC( 1$) :EXECL2U: IT=PEEK(PA) : 1F1 く 480RI >92THEN159
179 POKEPA, 1 :EXECSYM: IFPEEK(PA ) >9THEN159
189 PLAYE$:MN=INT(LEVX2-(T/(2^LEV) ) ) : IFMN >8THENMN=8
199 MN=(MN<9 ) xMN+MN:LOCATE11.14:PRINTA$(MN) :LOCATE11.15
299 PRINT "モウ イチ ト ~ ヤル M(Y/N) 2 95
219 I$=INKEY$:IFI$=" "THEN216
229 IFI$="Y"ORI$="y"THEN79
239 END
399 PLAYE$:LINE(96,32)-(152,128) ,9,BF:FORI=1TOLEV:FORJ=9TO1
319 POKEPA ,PEEK(MG+N+ 1 ) : EXECSYM:FORM=9T0499:NEXTM,J,1:MN=9:GOTO199
599 DATA オチ ャ ノコ サイ サイ 。 マ ア マ ア ター ネ 。 ス コ ~ イ ! 1 。 ス コ ~ イ テ ~ スネ ー 。 シュウ サイ タ ~ 1 。 テ ン サ イ タダ “ !
519 DATA ヘン タイ タ ~ ナ 9? 。 キ チカ ~ イ カモ ネ ! 。 カ ミホ トリ テ ~ ス ! , サ ー ン ネン !
529 DATA 2, シ ョ キュ ウ , 3 , チ ュ ウ キュ ウ 。 4 , シ ヨウ キュ ウ ,6 ブフ "ロロ
539 DATA S8T159L1505CDEFCDEFCCCRFGBAFGBAFFF
1999 RESTORE 1949
1919 FOR I=@ TO 86:READ D$:POKE &HE999+I,VAL("&H"+D$) : NEXT
1929 RETURN
1949 DATA 21.44,E9,E5,DD,2E,99,7E,D6 ,39 21 .99.99,44.4F,99,29
1959 DATA 29,.29.91.69.E9,99,11.6C,C2,DD,26.98,7E,96.98,.9F
1969 DATA 9E.99,39,.92,.9E,3F,F5,1A,A9,28.92.DD,2C。12.F1,.13
1979 DATA 19,ED,23,E5,.21.18.99,19,EB,E1 ,DD,25,29,DE,E1.DD
1989 DATA 7D,77.C9,FF
1999 DATA 3A,44.E9,FE,61.38,96,FE,7B、39 ,92.D6 ,29,32.44.E9,C9
ャ LM(1-4)795
19 CLEAR&HCFFF:DEFINTA-Z:DEFFNR=RND( 1 ) *44:ADD=&HD199:GOSUB2999:WIDTH49:CONSOLEB ,
25 .9 ,.39:COLOR7 , 9 :CGEN9 : CFLASH9 : CLS : RESTORE99 : A=&HD999 : READD$:FORI=9TO09 : READA$( 1 )
: NEXT:FORI=1T04:READQL( 1 ) ,.QT$(T):NEXT:FORI=48TO92 : Q⑤=Q$+CHR$( 1 ) :NEXT : READE$ 、P$
29 FOR1=9TO86 :GOSUB199 : NEXT :DEFUSR=&HD9@99 :LOCATE1 4 ,2:PRINT "テコ スール スル" ECOLOR5 :
LINE(14.6)-(25.17) ," 園 "、B:COLOR7 :LOCATE13.19:PRINT "TIME=":ONKEYGOSUB79 :KEYOFF
39 LINE(9,29)-(39.24)," ",BF:LOCATE8,29:PRINT "トー ノ レベル テー ヤル (1-4)971 2 し =ー1 : WHILEL く
90RL>4 :L=VAL( INPUT$( 1) ) : WEND: IFL=9THEN89ELSEPRINTQT$(L) :LEV=QL(L):FORI=1TO1099:R=
FNR+ 1 : S=FNR+ 1 : N$=MID$(Q$,R, 1 ) :MID$S(Q$,R,1)=MID$(Q$.S,1) :MID$ も (Q$ ,S, 1) =N$: NEXT
49 N$=MID$(Q$,(FNRx(45-LEV) )\44+ 1 .LEV) :FORI=1TOLEV: A=USR( ASC(MID$(N$, 1 ) ) ) :FORJ
=9T0499:NEXTJ,I:TIME$="99:99:99":TIME=9:TEMP02999:A=1:KEYON: WHILEA>9:1=9:WHILEI く
480RI >92:T=ASC(INKEY$+" "):PLAYMID$(P$、FNRx3+ 1 、3) :T$=TIME$: LOCATE18.19:PRINTT$
59 WEND:T=TIME:A=USR( ! ) :WEND:MN=LEVx2-(T\2^LEV) : TEMPO559 :PLAYE$: IFMN>8THENMN=8
69 MN=(MN<9 ) xMN+MN : LOCATE13.22:PRINTA$(MN) :LOCATE13,24:PRINT "モウ イチ ト ~ ヤ M(Y/N)?7 5 1
$=INPUT や S(1):IFI$="Y"ORI$="y"THEN39ELSEKEYOFF : END
79 KEYOFF :TEMPO559: PLAYE$:LINE(16,8)-(23.15)," ",4.BF:FORI=1TOLEV:FORJ=9TO1:A=US
R(ASC(MID$(N$, 1 , 1) ) ) :FORM=9T0999 :NEXTM,J, 1I:MN=9: RETURN69
89 KEYOFF:FORI=48T092:FORJ=9TO1:A=USR( IT ):FORM=9T0499:NEXTM,J、。1:GOTO39
99 DATA E5DD2E997ED639219999444F992929299199D199915931DD26987E16989F1E9939921E67
F5ED78D629AB2892DD2CC629ED79C578D619473E44ED79C1F1931529DC23E521299999444DE1DD25
29CCE1DD7D772336992BC9 , オチ ャ ノコ サイ サイ , マ ア マ ア ター ネ 。 ス コー イ ! 1 。 ス コ ~ イ テ ~ スネ ー , シュ ウサ イ タ ~ 1 。 テ ン サ イ タ ~!
199 POKEA+ 1 、VAL("&H"+MID や (D や IX2+1 ,2) ) : RETURN: DATA ペン タイ タ ~ ナ ? 。 キ チカ ~ イ カモ ネ ! 、 カ ミホ ト ケ デ ~
ス ! 。 サ トン ネン ! 。2 、 シ ョ キュ ウ , 3 , チュ ウキ ュ ウ 。 4 ,。 シ ~ ョ ウキ ュ ウ , 6 ,. フ "ロロ 。O05CDEFCDEFCCCRFGBAFGBAFFF
119 DATA 01AO1BO1CO1DO01EO1FO01GO2A02B02C02DO02EO2FO2GO3A03B03C03D03EO03F03G04A04B04
CO04D04EO04F04GO5A05BO5CO5DO5EO5FO5GO6A06BO6CO6DO6EO06F06GO7A07BO7CO07DO07EO07FO07G
19 CLEAR399 ,&HDFFF:DEFINTA-Z:DEFFNR=RND( 1 ) x44:DEFFNT=INT(TIME/69 ) : GOSUB99 : ADD=&H
F199:GOSUB2999:SCREEN9 :WIDTH49:COLOR15,.9:CLS:RESTORE199:FORI=9TO9:READA$( 1):NEXT
:FORI=1T04:READQL( 1 ) ,QT も (TI):NEXT:FORI=48TO92 :Q⑤ も =Q$+CHR$( T) :NEXT :C$ も =CHR も (255 )
29 READE$,P$:KEYOFF :DEFUSR=&HF999:DEFUSR1=&H156:LOCATE14.2.9:PRINT" テ コス ズー ル "スール"
・GOSUB299:J=TIME\199:FORI=9TOJ:A=RND(1):NEXT:LOCATE13.19:PRINT "TIME="
39 FORI=29T024:LOCATE9 ,1:PRINTSPACE$( 39)j:NEXT:LOCATE8 , 29:PRINT" ト に ノ レ へ ベル テ ^ ヤル (1 -
4)273: し =USR1(9):L=VAL( INPUT$ も (1 ) ) : IFL く 90RL>4THEN39ELSEIFL=9THEN89ELSEPRINTQT$ も (し) :
LEV=QL(L)
49 FORI=1TO199:R=FNR+1:S=FNR+ 1 : N$=MID$(Q$,R, 1 ) :MIDS(QB、R, 1 )=MID$ も (Q$ も ,S, 1 ) :MID も (Q$
,S。 1 ) =N$: NEXT :N$ も =MID$(Q$ , (FNRx(45-LEV) )\44+1 ,LEV) :FORI=1TOLEV:A=USR(ASC(MID$(N$ 。
1 1) ) ) :FORJ=9TO199:NEXTJ,。I:TIME=9
59 T=FNT:R=FNR+19:PLAYP$:LOCATE18 19:PRINTUSING" 拉 提 音 仁 " 35T:T=ASC(INKEY も +" の):IFI=1
3THEN79ELSEIFI く 480R1 >92THEN59ELSEIFUSR( 1 ) >9THEN59ELSEPLAYE$:MN=LEVx2-(T\(2^LEV) )
:・IFMN>8THENMN=8
69 MN=(MN<9 ) xMN+MN: LOCATE13.22:PRINTA$(MN) :LOCATE13.24:PRINT "モウ イチ ト ~
=USR1(9):I$=INPUT も (1):IFI$="Y"ORI$ も ="y"THEN39ELSEEND
79 PLAYE$:GOSUB299:FORI=1TOLEV:FORJ=9TO1 :A=USR( ASC(MID$(N$, 。1) ) ) :FORM=9TO999:NE
XTM,。J,1:MN=9:GOTO69
89 GOSUB299:FORI=48TO92:FORJ=9TO1:A=USR( 1 ) :FORM=9TO0499:NEXTM,J。 1 :GOTO39
99 RESTORE99:READD$:FORI=9TO79:POKE&HF999+ 1 ,VAL("&H"+MID も (D$、 TX2+1.2) ) :NEXT:RETU
RN:DATA 21F8F7E5DD2E997ED639219999444F992929299199F199EB215991DD26981A96989F9E99
39929EDFFSCD4A99D629A92892DD2CC629CD4D99F12319E513D511299919D1DD2529D7E1DD7D7723
36992BC9
199 DATA オチ ャ ノコ サイ サイ 。 マ アマ ア ター ネ 。 ス コー イ ! ! 。 ス コ ~ イ テ ~ ス ネー 。 シュ ウサ イ タ ~ 1 。 テ ン サ イ タ ~ 1! 。 ヘ ンタ イ タナ 9 。 キ チカ "nx
カモ ネ ! 。 カ ミホ ト ケ テー ス ! 。 サ トン ネン ! 。2 。 シ ョ キュ ウ 。 3 , チュウ キュ ウ 。 4 。 シ ~ ョ ウキ ュ ウ 。 6 , フ * ロ ,T159 し 1605CDEFCDEFCCCRFo
BAFGBAFFF , "T255L64N=Ri“"
299 LOCATE14.6:PRINTSTRING$( 12.C$):FORI=7TO16:LOCATE1 4 1:PRINTC$+SPACE$( 19 )+C も :N
EXT:LOCATE14.17:PRINTSTRTING$( 1 2 .C$) : RETURN
ヤル (Y/ZN)2 リ "5: 1
い
nm
い
WW
見 かけ は シン プル で も 操作
は フフ ザ ツ ……。
も うけ に な る 。
で も EAT 8001 の 操
作 が メチ ャ ンコ 難し い 。
使う キー は だ た っ た の 2
6 う 。、 テン キー の ト の |
ここ は 旭 だ 、 と 思っ て ほし い 。 キ ミ (PC-8801 は [) は 、E
は 鉱石 収集 ロボ ッ ト EAT8001( キ ) で AT が 右 に 動い て いれ
時 間 内 に 鉱石 ( ロ ) を 10 個 集め る の が 仕 ば 下方 向 に 、 左 に 動い
事 だ 。10 個 集め る た びに 仕事 場 は 変わ て いれ ば 上 方 向 に 動か
り 、 制 限 時 間 は 短く な っ て くる ん だ け すず ーー。 も うい ひび と つの
ど 、 な あ に 誰 で も で きる カン タン な 仕 スペ ー ス ・ キ ー は EAT を 反対 方 向 に 動 や っ て みれ ば わか り ま す 。
事 。 だ だ し 、 恵 シタ ダ (mw) や まわ ちり か す キ ー。 フ ム ム 、 言 葉 で 説明 する と 駐 参考 「 マ イコ ン BASIC マ が ガ ジン 」
の 壁 に あ だ た だっ た ら ゲ ー ム オー バー に な わけ が わか らら ない だ ろう けど …… 二 > ?84 ・7 、『ALIEN 退治 』
ロ
る よ 。 リ プレ イ は |S| キ ー。
鉱石 を 1 個 取 る ご と に 10 リ ル (/ 星 の
貨幣 単位 )、 も ぐら (0O) は 1 匹 50 リ ル の
1 WIDTH49 ,25:CONSOLE9 , 25,9 , 1:DEFINTA-Z
2 M=1:COLOR5
3 X=19:Y=9:V=19:W=9:A=10:T=559-Mx59
4 PRINTCHR$(12) :LOCATE15.9:PRINT"TIME"
8 LINE(9,1)-(38,24) ," 還 " .3,B:L=1:K=M+ 1
3
7
8
_ ダ じ な |
| き 5 も 「 比 て て | Bs15:FORI=1TOB:GOSUB16:COLOR4:LOCATEC.D:PRINT"。":NEXT:FORI=1TOK:GOSUB16:COLOR
| 1 か の べし | :LOCATEC,D:PRINT" 還 ":NEXT
に る 出 か | 1=INP(8) : IFI=253THENW=Y+LELSEV=X+L
ぼ も か ー と 会 い 1 Z$=INKEY$: IFZ$=" "THENL=Lx- 1
| ん り + ー “ ム い P=PEEK(8HF392+Wx129+Vx2)
| ょ は ひ ー $ 前 2 可 本 MS 9 MANEM66RRRM0M4838RNUNMRSSIERMMA
7 て 拉 ・ ・ 0 Tu
1 に じ ち 目 C て | 11 IFP=135THEN15ELSET=T-1 :LOCATE29,9:COLOR5 :PRINTUSI
| ここ う > て | ロト NG" 村 "iT:TFT=9THEN
| が ーー うこ ソン | 11THENBEEP1:BEEP9:S=S+59 0
1 8 き ー ィ ェ ュ | USR NUM OM W
『 だ り に ア い ッ | :B=T/2: 4,8:PRINT"BONUS ":B:S=S+B:LOCATE14,19:PRINT"SCORE="
(| よ な た :S:FORI=1T09099:NEXT :M=M+ 1 :
| し か り | - と 」 15 EEE?OCATEIT8PRINT デ IGEOWER に IGRCI2URSDREeSMNIT4 8,255:RUN
に _。 ン リ 16 C=RND(1)x37+1:D=RND(1)x22+2:RETURN
一変 数 リス ト に ー 3
M・… 面 数 < 時 。 ・ キー 操作 が 独特 で お も し ろ い 。
XY……EAT の 座標 : 還 プ ログ ラム の 8 本 さき あの の と に 生
EE お の 本 に 邊 委 に 5 ・ 12 も ぐら は ある か ? : 人 は 、3 行 の T の 数 値 を 大 きぐ
還 生計 ・ 13 EA 「 表 示 ・ し て 時 間 を の ば す ガ 、6 行 の :F
時 の o な 3 5 本 _ 14 面 ブ ノア 処 昌 ・ OR 1 TOK へ 以下 を 潜 去
ee 理 シ ・ 箇 表 示 ・ 15 プー ム オ ー ル バー 処理 ・ し て 、 毒 シダ を 画面 に 表示 し な
Rue 細 ら 2 の 9 の の 16 品数 ルー チン ・ い よう に し て みて ぐだ さい 。
再 ・ 9-10 も ぐら 、 鉱 石 は ある が : 画 チ エッ ツ フ ボイン ト ・ 。 支 ヨ ッ シ ャ 買 。
WW
ゲー ム は 単純 な ほど お も し ろ い と い
う 声 と 、 い ろ い ろ 楽 し い 仕掛 け の あっ
だ ほう が お も し ろ い と いう 声 と 、2 通
り の 意見 が ある けれ ど 、 こ の ゲー ム は
前 者 の 代表 と いう と ころ 。
余分 な 仕掛 け は いっ きい な し 。 登場
する キャ ラク タ と いえ ば 、 写 真 で ご 覧 し て て くる が も 。
の と お ぉ おり 、 た だ の ドッ ト 。 で も 、 こ 作者 に よれ ば 「20 一
だ け で エキ サイ ティ ング ・ ゲ ー ム に な 30 回 6 や っ て いれ ば 、
っ て いる ん だ か ら り っ ぱな も の 。
ゲー ム が は じ ま る と 、 画 面 の 左上 か
ら 有 下 へ 回 が っ て 点々 タタ me と 局 が !
落ち て くる 。 こ いつ を 、 テ ン キ ー の [2
ー
い 寺
Ax
ン
WW
V WNW
[41618] を 使っ て 、 上 へ 移動 きせ た り 、
左 へ 移動 きせ た り 、 ま た も と の 方 向 に
も ど し だ た り し な が ら 、 画 面 の 外 べ へ 出 な
いよ うだ ひだ すら キー ブ す 9 る の が ゲー
ム の 目的 だ 。
か な り の 集中 力 と 精
神力 が 要求 され る 忍耐
の ゲー ム だ か ら 、 和 気分
の サッ ト し て な いと
きる に 0 は 、 の ん る て
夢中 に な っ て スッ キリ
150 一 200 点 くら い は い
あけ 朋 スン eeW
最初 は と し て も で き な い
よん て 思っ つて いて も 、
閉 / リ 0g- つ ブ @
年 衝 枚 ほとん と ん うま く な っ つて ゆく 6
の な の だ 。 ゲ ー ム オー バー に な っ て も
スペ ー ス ・ キ ー で リプ レイ 。 何 度 で も
チャ レン ジ し て みよ う 。 ちなみに 、 最
高 点 は 念 の と ころ 446 点 だ を うだ よ 。
廊 参考 「 マ イコ ン BASIC マ ガ ジ ン 」
84・1、『 シ ョ ー ト プログラム の 組み 方 』
H ュー らら CORE
4 ご この 点々 を 自由 自在 に あや つつ て ぐれ /
CMD SCREEN 2.9.6:CONSOLE9 .25 .0 1:DEFINTA-Z:WIDTH19 .20 :HS=106
X=20:Y=13:CMD CLS 3:VX=1:S=9:VY=1
COLOR2:LOCATE10.20:PRINT "Hi-SCORE"
COLOR 7:LOCATE 19.9:PRINT "SCORE"
I=INP(9):IFI=191THENVX=VX+2ELSE1FI=239THENVX=VX-3ELSEIFI=251THENVY=VY+2
L=INP(1):IFL=254THENVY=VY-2
IFX く <90RX>3290RY く 00RY >299THEN1 20
【FHS く STHENHS=S
COLORS:LOCATE29,9:PRINTUSING" 手 料 "S:COLOR3:LOCATE20 、18:PRINTUSTNG" 村 手持 "
109 X=X+VXEY=YTVY:VX=VX+1:VY=VY+1
119 (CMD PSET(X.Y).3:S=S+1:GOTO 59
129 COLOR4:LOCATE13.9:PRINT"GAME OVER"
139 R$=INKEY$:1FR$=" "THEN29ELSE139
0
5 つ 日
| た アウ つ っ
IN )、 /
* 0 を プ フ
0 作 ト
DI
も の な 遊
カカ いん
を で
見 88 る
』 せ を け
| に 内 と
や ね 自
SN
メア か
の
よ は
nr の 某 4 下 mAS と は は テー く A き
と n 眉 六 思 だ ヨー の の の 一 の で 問 持 ロ
8 喜 > 対 は CWC の ー の ちの と
一 変数 リス ト ・ ら …… ス コア ・ 100-110 TENTEN の 表示 : に は 、100 行 VX= ニ VX+0. 1:
X……TENTEN の X 座 標 ”・ HS…… ハ イス コア ・ 120-130 ゲー ム オ ー バ ー ・ VY=VY+0. 1 と すれ ば よ ぐ 、
Y……TENTEN の Y 座 標 "・ 弄 プ ロブ ラム の 説明 ・ 田 チ エッ フ ボ イン ト ・ その 他 、50、60 行 の VX、VY の
VX-……X 座 標 の 物 動 用 ・ 10 一 40 初期 設定 ・ 。 この ゲー ム は 、 め ちゃ ん ご お : 増分 を 変化 させ る と お も し ろ い 。
VY……Y 座 標 の 移動 用 ・ 50- 90 キー スキ ャ ン ・ ず か し い 。 そ こ で 、 簡 単に ける : 婦 ヨ ッ シ ャ 賞 。
7 う
性
この ゲー ム の 主人 公 は 、 な ん と 奨 力
団 の お に いさ る ん 。 あ る 日 、 な た い へ ん な
内 骸 を し て か し て し まっ うた, 莉 労 し て
密輸 し た 金塊 を 町 中 に バラ まい て し ま
っ だ の だ 。 そこ で 回 収 を 命じ られ だ の
だ が 、 あ わ て て 車 を 電柱 に ぶつ け て し
まい 、 右 折 し か で き な く な っ て し まっ
だ の だ 。 お まけ に パト カー は 追っ て 〈
車 は 6| を 押せ ば 進行 方 向 に 対し て 右
9ko* チ
。 し
へ 媒 神
ン -
、. 放 W 震
串 ③ 酒 滞 二
OSne(i の 導 古 如 冬 は に NuNnNS |
BY
\m 回 ゆき C 挟 さと うず VH ユ q |
_ で 避 mmSY ロ は ーー 品 ぐ 如 環 中
か 2
2
つう
も
で ご
レス
。vl9t
で 軸 ぶ と は て (J 京 は ツン と て さっ
ざき ぶ (S 間 H . 半 JR 須 貞 ゆ 生
側 ど ご け に 曲がる 。 な ん と か
この ポン コッ 車 ( ホ ) を 操作
マ 石 に し ガ 曲 が れ な いん だ か
ら ヘ ン な と ころ に 入 つ ちゃ う
の 中 ク ラッ シコ /
| EE BB BBB EEHEHEEBE
日 日 日 日 日 日 日 日 日 日 BBEE BBB
日 日 日 四 昨 日 旭日 登
日 下 日 昌 日 日 BEE
憧 提 SCORE 6
EE 日 日 日 BBEEEB 日 (
詳 糧 時 旨 誠 引
OHUEHERRRROHHRE
し て 、 金 塊 (@) を 全部 ひろ
つて は ほしい 。 も ちろ ん バト 上
カー( 分 ) に つか まる と ゲー 目
ム オ ー バ ー。 召 に ぶつ か っ 上
て tb も 。 動 が ぐ な つう て ゲー 上
の ポー デー パー だ 。 リブ レイ は
人 Am スマ ギー。
WIDTH 49,25:CONSOLE 9,25.9,1:COLOR 6.32.9:PRINT CHR$(12)::DEFINT A-Z
FOR I=1TO6:LINE(9,Tx4-4)-(26.1Ix4-1 ) , "日 " 1,BF:NEXT:MC=ASC( " ホ ") :AC=ASC( "分 ")
FOR 1=0 TO 5:READA:FOR J=9 TO 5:X=25-Jx4+((A AND 2^J)=9)x4:Y=lx4+1
LINE (25-Jw4.Y)-(X.Y) "ENEXT:NEXT:FOR 1=9 TO 6:READA:FOR J=9 TO 4
X= TX4+1:Y=1+JX4-((A AND2^J)=9)x4:LINE(X,JX4+1)-(X.Y) "9 "NEXT:NEXT:V=-3326
POKE&HF3AC,AC:POKE8&HFD9C,MC:POKE 8HF37C,ASC( "円" ) :GC=ASC( "@") :KC=ASC( "日 " )
G=19+MX2:FOR 1=1 TO G:FOR J=-1 TO 9:X=RND(1)x26:Y=RND( 1 )*22:J=PEEK(V+Xx2+Yx1
109
209
219
212
216
225
236
29) く 232:NEXT:POKE V+Xx2+Yx120,GC:NEXT :F=1 :LOCATE29,5:PRINT "SCORE":S:
240 DX=-1:DY=9:X=25:Y=21:AX=25:AY=1:EX=9:EY=1:BC=32:M=M+ 1 : IFMMOD3=9THENRESTORE
390 IF INP(9@)=191 AND XMOD4=1 AND YMOD4=1 THEN DQ=DY:DY=DX:DX=-DQ
319 NX=X+DX:NY=Y+DY :P=PEEK(V+NXx2+NYx129 ) : BEEP1 : BEEP9
320 IFP=KCTHEN POKE V+NXx2+NYx129,249:BEEP:POKE V+NXx2+NYx129,KC:D=D+1:IF D<5 TH
EN POKE V+XX2+Yx129,32:DX=-1:DY=9:X=25:Y=21:GOTO 319 ELSE 599
339 IFP=GC THEN S=S+M:G=G- 1 : BEEP1 :FOR 1I=1TO109 :NEXT :BEEP9 :LOCATE34 ,5:PRINTS:
349 IFP=ASC(" 円 " ) THEN IF G=9 THEN S=S-(D=9 )x19xM:FORI=1TO0299:BEEP1 : BEEP9 : NEXT :LO
CATE19,9:PRINT" GOAL 11 "FORI=-1TO09:1=INPUT$(1) く >" "NEXT:GOTO199 ELSE 599
359 IF PsAC THEN LOCATE 19.5:PRINT "COUGHT !!! "5:GOTO 599
360 POKE V+Xx2+Yx129,32:X=NX:Y=NY:POKE V+Xx2+Yx120,MC
499 IF AXMOD4=1AND AYMOD4=1THEN FORJ=-1TO9:DQ=EY:EY=EX:EX=-DQ:J=RND(1)-.7:NEXT
419 NX=AX+EX:NY=AY+EY:P=PEEK( V+NXx2+NYx129):IF P=KC THEN 499
429 IF PsMC THEN LOCATE 19,5:PRINT "COUGHT 117: EGOTO 599
430 POKE V+AXx2+AYxX129,BC:POKE V+NXx2+NYx120,AC:AX=NX:AY=NY:BC=P:F=1:GOTO 399
599 BEEP:LOCATE 19.9:PRINT"GAME OVER "::FOR J=-1TO9:J=INPUT$(1) く >" "ENEXT:RUN
699 DATA 32.52.9.6,&H28.9.9,12.8.6,1.22.9,&8H2A.8.2.9.8H38,8,2,9,6,9,&H1C,16,2
629 DATA 8&H28,&H9C,&H2D,&H099 ,&H18,8H98 ,8&H99 ,&H19,8H94,8H99,&H1D,8H14.8H16
田 変 数 リス ト ・ EXEY…… パ トカ ー の 向き ・ 田 プ ロブ ラム の 説明 ・ が 、 簡 単に ける に は 、 金塊 の 数
MC,AC キャ ラフ マタ ・ コ ー : D…… が べ に あ だ つ だ 回 数 = ・ 100-240 初期 設定 ・ を 少な こし て みて は 。230 行 G=
GCKO ドド : P…… 移 動 の と き 前 に ある キヤ : 300-360 自分 の 移動 ・10+M*2 の 10 を 適当 な 数 値 に
Se の ラク タ ・ 400-430 パト カー 秘 動 ・ 変え る と いい で すね 。 全 部 で 、
G…… 金 塊 の 数 ・ V……RAM ア ドレ ス ・500 の ー ム オー ルー ・ 3 面 ま で ある の で 、 が ん ば つて
M…… 面 の 数 ・ NXINY…… 移 動 時 の 前 方 の 座 ・ 600 一 620 画面 デー タ ・ くだ さい 。 放 バッ チリ 賞 。
XY…… 自 分 の 座標 ・ 標 ・ 男 チエ ツ フ ボイン ト ・
AXAY…… パ トカ ー の 座標 : DO…… 計 ・。 わり と お ず か し い ゲ ー ム で す :
2
遊び 方
これ 、 ヴ ィ ク ジィ ブ と 読む の だ そう
3 5 の だ の
字 宙 歴 1035 年 、 が ガル チャー 人 の 侵略
に よっ て デュ ラン 是 は 絶滅 の 危機 に 瀬
し て いた だ た 。 そ を こ て 新 た に 開発 され た ビ
ラミ ス と いう 戦闘 機 が 画面 下 に 登場 。
キミ は この ピラ ミス を [1I3] キ ー て 左
右 に 動か し な が ら 、|Z 一 で ウェ ー ブ
砲 を 発射 し 、 敵 機 や や っ つけ て くれ 。
StytSt9tt
rry 湘 圧 9 事 琴
で -
デ
|
| る
| と
| 思
| 思
ま
え
向 ご ー ベ メー はご コ テーV ユ 壮 は は の 0
ー 人 は と は OM
還 変 数 リス ト
F…… 敵 機 の ポイ ント
M-…… 医 機 出現 度数
〇 …… 敵 キヤ ラフ タ
Ds が) 直
X…… 目 機 X 座 標
一 プロ ブラム の 説明
10 一 30 初期 設定
へ ぷ て eStA9t(tCC てき 用 出 SS
(( SAS は ど 4J 革 ざき 肝 中. なさ コ
さき のど rv 中 モー ロロ 放さ 圭 4
ー ナ ス が だ 。
リプ レイ は HOMECLR キ ー。
も すえ る も えす も えす も も 3 朗 -)%、1 コ
ボ ボボ ボボ ボボ は ほ ま ー 人 CO の SR だ
英機 の 数 は 画面 下 ひ の インジ ケー タ ー
で 表示 きれ る 。 目 盛り いっ ぱい に
な る ま て 敵 が 増え を る と ゲー ム オ ー
バー に な っ て し まう ぞ 。 一 定時 間
辿 え る と 1 面 ク リア で 1000 点 の ボ
移 等
マウ ェ エー ブ 砲 と いつ より も 、
/ リ 0g- つ づ @
掃射 介 み だ いな 感覚 。
4 さき 9
も 9 素人 ※ 玉 家 突 来 来
上 党 表 トス /
WIDTH49,25:CONSOLE,,9,1:DEFINTA-ZEDIMZ(15) :Z=&HF55A
19:C=236
D=9:X=17:F=F+109:T=T+1:M=M-21C=C-4:FORA=9TO15:Z(A)=9:NEXT
CONSOLE9 , 25:PRINTCHR$(12):LINE(1.9)-(37.2)。"%"。5,B
LINE(1.24)-(37、24)。 "ご"。4:LINE(13.24)-ー(25.24)、 "ドド 。2
LOCATE13,9:COLOR7 :PRINTUSING" SCORE 提 折 "1SELOCATE11,2
F=0:S
PRINTUSING" HI-SCORE
"1HILOCATE15.13:COLOR7:PRINTTSCENE 「 洒 T
FORW=1T02999:NEXT:LINE(15.13)-(23.13).) ICONSOLE6,16
FORB=1TO39:FORA=9TO15:A$=" "=1NP(0 )
X=X+(1=247 )x(X く 33) -(1=253)*(X>1) :LOCATEX,22:COLOR6:PRINT" ] 還 |“
I$=INKEY$: IFI$="Z"THENZ(A)=X+21A$= リ ー"
L=AMODM: IFL=9THENGOSUB160
K=(A+1)MOD16:IFPEEK(Z+Z(K)x2) >32THENGOSUB199
LOCATEX+2,21:PRINTA$:Z(K)=0:NEXTINEXT
S=S+1999:FORA=1T020:BEEP1 :FORW=1TO190:NEXTEBEEP9:NEXT :GOTOS9
R=RND( 1 )*33+3:G$=CHR$(RMOD4+C): IFPEEK(Z+Rw2) 232THEND=D- 1
LOCATER,5:COLORRMOD7+1:PRINTG$:D=D+ 1:LOCATED+12.24:COLOR2EPRINT" 軒 "
IFD=13THEN219ELSERETURN
BEEP1:D=D- 1:LOCATEZ(K) 5:PRINT"
"ES=S+F: BEEPW
LOCATE21 ,9:COLOR7 :PRINTUSING" 必 "いい SE:LOCATED+13.24:COLOR2:PRINTT PERETU
FORW=1TO199:BEEP1 :BEEP0 :NEXT:COLOR3
LOCATE7 ,13:PRINT "オーズ イオ 人 馬 、 介 画 一 4 ト 較 四 丁 較 :IFS>HTHENH=S
LOCATE7 14:PRINT "自重 正章 目 園 ペア マ ア 還 還 WWAIT81.255:GOTO20
40- 60 画面 表示
90 メイ ン ル ー プ 開始
100 目 機 表 示
110 ウエ ー ブ 師 発 農
120 英機 表示 サブ へ
130 ウエ ー ブ 介 命中 か
140 スプ ロー ル
150 ンク ルリ
160 一 170 英機 表示
160 一 200 敵 機 撃墜
2J(Uos280) クー ヘム オー/ ビー
田 チ ェ エッ ンク フ ボ イント
けつ ご こう 幸 中 で きる ゲー ム で
す が 、 ゲ ー ム が へ だ な お 私 は 、 ど
うし て も 2 面 を 突破 で きま せん 。
そこ で 、 こ の ゲー ム は 、 画 面 上
に 敵 機 が 13 機 出現 する と 、 ゲ ー
ム オ ー バ ー に な る の で 、180 行 D
ーー13 を 、 適 当 な 数 値 に 変え て み
まし だ た 。
まだ 、50 行 LINE (13, 2
ー(25,24) の 13, 25 を D に 入力 し
だ 数 値 に あわ せ て 、 変 えれ ば 、
画面 下 ひ の イ ンジ ケー タ も 、 う ま
ぐ 改 造 で きま す 。
敵 機 キ ヤラ が 、 気 に 入ら な い
人 は 、20 行 の び ご の 値 を ガサ えて み
て ぐだ さい 。 衣 ヨッ シャ 賞 。
Z う 2
!
WW
mWW
と 、 絵 の 衣 れ る の が 止ま り 、 ゲ ー ム ス
婦 一 、
は に クー が の の の で て おり まし ん (とい 黒い マス を [214[6I8| キ ー で 上 下 左
CO グ 二 は まだ 生き で いて 、 よそ を で 活動 の し を ん と よ の よう に ん ゆ ひ ペ か
一 生 懸 命 働い て いま す )。 プラ ス 、 バ パ ズ えて ほし い 。 黒い マス を 上 に 動 あ みす と 、
ゝ ふ ル な ん だ か ら 、 拍 手 / 上 上 の コマ が 黒い マス の あっ た し と ころ に
遊び 方 0
作者 に よれ ば 、 家 庭 用 テレ ビ で 見 た 移動 する と いう 仕組 み 。 例 の 15 ゲ ー ム
RUN さ る せる と 、 ま ず 、CG. が 画面 に ほう が 多少 ぼけ て 、 き れい に 見 える ん を 思い 出し て や れ ば いい と 思う 。
現れ る 。 ん 、PC-8001 で C.G……… / で は な いか …… と AS だ た 。 も と の 絵 を 見 た か っ た ら 6|5| の キー を
20 が 宣 ん て 思う て いる と 。、 こ さて 、 絵 が 出 て きた と ころ で 、 適 当 押せ ば 少し の あい だ だ け 見 られ る よ 。
れ が ちゃ ん と し だ た パズル な ん で すね 。 な キー を 押す と 、 黒 い マ ス (要する に 完成 し た ら リ ター ン ・ キ ー を 押し て ね 。
イラ スト の 好み は と や か くい わな い ブラ ンク で す ) が 勝手 に 移
こと に し て 、 そ の 男気 を か な う 、 と 今 動 し て どん と どん 絵 を ムチ ャ
ググ た SW ほ し て いく 、 を の ラ
シダ ム ワ リ ー ク を じっと 見 て
いる だ け だ と 取り が かえし が
つの が で だ の の て 、 人 当 全 OO
と ころ で ANYKEY を 押す テ
ャ バズ ル 作 成 完了 。 (8 も 9 人 測 陸
2 寺 欄 2 く で を テー 徹 う : を っ て 輝く
うい ち ど カ ワイ ちゃ ん に SS っ 8 おけ HRRNMP の RE
も ど ご レ C 梓 。
ES
に 2
し 】
0 2
人 2
KS
こつ
JfY・ 還 叶 六 鞭 ) 水
の |
AE
に |
穫 の
| 人 癌
1
| C 齢
| | 化
8 6 の
| 0 お
| 0 そ
| | る
5 m し
ま 1 と
今
| を た 日
| 員
い の
まま 1
| いろ
| た
| 今
は は
財 カ
ーー り
歳 ジ
ー ヤ
ク
7 が 氏
の ) よ
低 1
年 測
齢 さ
牧 ん
2 9 人
自 さ
人 え
| 本 H 計 と YO と と 品 ご させ S 陸 好
ーJSteoSt は 潮
76
19 ′ If you want to reverSe thiS
2 ‥ SCTeen, PleaSe PuSh fi・1 Key.
61/ 還 還 旨 放 よさ メス よそ そそ メス ズ エエ イエ エス エエ エネ そそ エエ エマ テテ エエ エメ エエ エメ マズ.
40 | ※ くく The29 >> し 3
59 ' ※ Version 7.3 し 3
69 し 3 N-BASIC / PC-80991 3
79 ' ※% by Midnight・Sun し 3
809 し 3 May 1984 し 3
9 EE そそ そよ そそ テス テテ テテ エエ そ テ エメ テテ テテ エエ そそ エエ エエ エエ エエ エエ エエ コ
1099
119 CLEAR399 ,&HCEFF:DEFINTA-Z:DIMPT(199) ,SP(199):X=9:Y=2:KEY1 "out81.32"+CHR$S(13
129 WIDTH89,25:CONSOLE9 , 25 .9.1:COLOR2.9,1:PRINTCHR$ も (12):OUT81.33
139 RESTORE550 : ZZ=&HCF99 :DEFUSR9=&HCF99:DEFUSR1 =&HCF22
149 READZY$:IFZY$ く >"w"THENPOKEZZ , VAL("&H"+ZY$ も ) ZZ=ZZ+1:GOTO149
159 A$=" PC-8991 << The29 >> by Midnight・Sun":LOCATE4,24:FORZZ=1TOLEN(A$):PRIN
TMID$(A$,ZZ.1)::FORYY=9TO59:NEXTYY 、ZZ:RESTORE439 : GOSUB499:LOCATE4.24:PRINTA や も
169 RESTORE529:FORXX=26TO156STEP2:READYY:LINE(XX.9)-(XX.YY) ,PSET:NEXT:RESTORES3 り の
:FORXX=126TO148STEP2:READYY:LINE(XX,YY)-(XX、99) ,PSET :NEXT:PSET(2、16):PSET(2.17):
PSET(119.9):PSET(149.9):PSET(151,9)
179 LINE( 2,32 )-(31.47) ,PSET ,BF :LINE(3,33) -( 39 , 46 ) ,.PRESET , B:PSET(9.32):PSET(9.47)
189 RESTORE569 :FORZ=&HF359TO&HFE99STEP120:ZZ=0
199 READXX,YY$:IFYY$="x"THEN299ELSEPOKEZ+ZZ 、XX:POKEZ+ZZ+1 VAL("&H"+YY も や も ) ZZ=ZZ ォ 2
GOTO196
299 NEXT:ZZ=USR1(9):GETQA(1.8)-(15.11) PT:COLOR7
219 LOCATE47.24:PRINT"Push any key"::A$=INPUT$( 1) :BEEP1 :BEEP9:LOCATE47.24:PRINTS
PC(12)::TT=9:GOTO239 6
229 A=INT(RND( 1 ) x4 )x2+2:A$=RIGHT や (STR も $(A) ,1):IFVAL(AL$)+VAL(A$ も ) く >19THENGOSUB260
239 LOCATE47,24:PRINT"Leve1:":TI::IFINKEY$ も =" "THEN229ELSELOCATE47,24:PRINTSPC( 1.5 )
249 GOSUB429:TIME$ も = "99:99:99"
259 LOCATE48.24:PRINTTIME$::A も =INKEY$: IFA$=" "THEN259ELSEBEEP1 : BEEP9 : GOSUB260 :GOT
0250
269 DX=X:DY=Y:IFA も ="2"ANDY く 5THENDY=Y+ 1
279 IFA$= "4 "ANDX >9THENDX=X- 1
289 IFA$= "6 "ANDX く 4THENDX=X+ 1
299 IFA$="8"ANDY>9THENDY=Y- 1
399 IFA$= "5 "THENZZ=USR(9) :FORZZ=9TO0999:NEXT :ZZ=USR( 0 )
319 IFA$=CHR$( 13)THENGOSUB379: IFOKTHEN390
329 IFDX=XANDDY=YTHENRETURN
339 AL$=A$
349 GETQA(DXxX15+1、DYx4)-(DXx15+15,DYx4+3) .SP
359 PUTQA(XX15+1 ,Yx4)-(XX15+15.Yx4+3) ,SP:PDTQA(DXX15+]1 .DYX4)-(DXx15+15,DYx4+3) ,P
T:TI=TI+1
369 X=DX:Y=DY:RETURN
379 OK=-1:RESTORE549:FORSY=9TO5:FORSX=9TO7:READJD:IFPEEK( &HF391+SXx19+SYx699) く >J
DTHENOK=9
389 NEXTSX ,SY: RETURN
399 PRESET(2.16.5):PRESET(2.17.5):PRESET(119.9.1):PRESET(149.9,1):PRESET( 151 .9,1
):LINE(9,.32)-(31,.47) ,PRESET , 5 .BF :LOCATE48.24:PRINTTIME も $::GOSUB429:LOCATE9 9:A$= 1
NPUT も ( 1 ) : RUN
499 READZ1.Z2.Z73.Z4:IFZ1=9THENRETURN
419 LINE(Z1.Z2)-(Z3.Z4 ) ,PSET :GOTO04099
429 FORZZ=9TO19:FORZX=9TO59 :NEXT : BEEP1 :FORZX=9TO59:NEXT : BEEP9 : NEXT : RETURN
3 人 9 DATA55。31 59.45。 59、45.61 6W、 61.60.62.63。 62.63.09.72。 69.72 7 アア, 79。 7/。79.9
8,.86,。 91.87。111.84, 111.84.129.77,。 87.87.85.99、 127.79、.125.99, 125.99,126.99. 13
9.73,145.67,。 145.67,.148.57。 148.57.147.53。 147.53.144.51, 144.51.134.74
449 DATA134.74.129.89, 129.、89,.136.52。 136.52.123、28,。 123.28、128,48, 128.48.104,1
6 。 194.16.104.28。 104.28、197.38。 107.38.101 32。 101.32.90.15, 90、15.90.27 99.27
。93.39,。 93.39、81.28。 81.28.72.13。 72.13.74、33。 74.33.65,.27。 65,.27.69,19
459 DATA6g.1.61、29。 61 .29.。63。39。 63.39.55.31 , 57,、40.56.43. 56,43.57、50 。 5/ 50.6
55。 56。49、42。9 み 2、 42.、32、83.20。 939.2、25、 作 、. 64、33.68.31 、。 74.90 76 30 、 108.33、111
3111 3934117、3S、 78、50。 745 、 45、 ア 1 4 1 、、 イ 1 、41 、 74 27 。 7 397, 79 38
469 DATA78.38.89,46, 89.46.79.59。 79、38.83.48。 83、48.83.52、 83.52.809.58, 89.58,8
ジ 2、68。 74 397 。71 37。 71..37.69.39。 69.99.68.42。、 116.55.110.49。 119.49。111 .94、 11)。4
4。114.42。 114.42、118.44、 118、44.129、59, 129.59、118.55, 118、55.116.58
479 DAYAI99、42。111。41 。、 111.41.114.42、118.44.123.49、 129.49、124.54 。、 75 52。 7 752
12、58 114、5B。 67。49.68、37。 68,37 ア 771 、35。 71 95、77、36、 109。40。11 1.39。 111.99.119
42。 119.42.1283.46。 123.46.129.5! 。 98.68.95、70。 95 70.99。71 。 91 。71 、8b。66
489 DATA92.75.93.75,。 73.48.72.46。 72、46.73.45。 73.45.75、48。 75、48.74、44。 74.44,7
5 、41。 75,41.76,41. 76.41.78,45。 78.45,.77.48,。 112.54.112.49。 112.49,114.46. 115.,4
7ZeU15。53。 115。53.。1.14.55. 115.55.145.58。 115..53.1J7.51.。 1117.St.118.53
499 DATA118.53.117.55, 72.42.75.38。 72.44.77、38。 77.49.77.49。 77.42.78.43, 111.4
5。 414.42。 T11。47.115.43。 115.45.。.117.43。 115。47。117.45。 116、48.118。46 。 117 .49..1.16
。48。 119.59、129,49,。 111.49,.111.49、111、51、111.51, 76.59.76.59, 113、56.113.56
599 DATAS56、35 .56。42。 69、28.69.37。 72.23.72.32,、 99.27.90、37。 194、28.194.35。 124,3
ちら <124、43。 132.69.132.77。 184.61、134.74。 136 92.136 7 。 64.709.9 79、 6/、72.9 2。 7
9.75.9.75.73.79.9、79, 89.84.9.84、 83.99.9.99、5、79、9、85, 19.79.9、.99
519 DATA15.79.7.99。 29,.79.15.99, 25.70.22.99、39.79.39.99. 35.79.37.99. 49.79.45
.、99, 45、79.52.99, 59.79.69.99, 55.79.67,99,。 69、79、75.99、 65.79.82.99、9.9.9.9
2 DATA1。5 0、15。20.22.25、206 、30 39、45 36.38 89.41.81 、33.16 20 23.27 28.30。12.1 4
18.21、24.28.39、32.34.14.16、19.22.25、28.32.15.17.29,22.25.28.39.33.36,38.28.31.3
5.39.42.48.51.64.69.55.51.52.53.99.99.99.99
539 DATA85.82.82.89.77.75.74.73.71.69.64.58
5 DATAO、0、15.15.15、15、15.15 4, 、15.91 15.15、15.15 9@.255 。0 0。134 0.8。15。0 9。 ひ 。!
12.97.9.9.23,.192.9.48.8.33.9.34.15.9.9.9、9.9.9.9,9
559 DATA1.B8.B,11.9.D9,21.9,F3,ED,B9,1.B8.B,11.9.F3.21.9.DD,ED,B9,1.B8,.B,11.9,.DD
.・21.9.D9.、ED,B9 .C9、1.B8.B,11.9.DD,.21.9.F3.ED,B9 ,C9,※ 5
569 DATA9.B8,.14.38.9.x,9,B8,15.38.9,*X,9、B8、15,.38.9、X,9、B8.16.38.9,X,.9.B8.17.38.3
7.F8.39.38.46。F8,47.38.9,x。9.B8,.19.38.31.F8.32.38.37.F8.49、38.46.F8.48.38.54,F8,
55.38,.9,X.9、B8.29.38.31.F8.33.38.37.、F8.41.38.46.F8.59.38.54.F8.57.38,.0,※
579 DATA9,B8,21.38.32、F8、35.38.37.F8.42.38.46.F8,51.38.54、F8.58,.38.9,%X、9、B8.23.3
8.32、F8,、44.38.47.F8.52.38.54,F8.69.38.63。F8.、64.38.9.X,9.B8.26,.38.39.F8.61.38,.64。,
F8.65.38.9.*,9.B8.28.38.29.F8,.37.B8.49.、F8.63.38.65.、F8.67.、38.9.x.9,B8,29,.F8
589 DATA57.B8.69.F8.68.38.9、*、9.B8.39.F8.69.38.9,xX、9,B8.31.F8,.68.38.73.F8,75.38 、
9,*.9.、B8.31.F8.68.38.72、F8.75、38.9.*、9.B8.32,F8.68.38.71.F8、74.38.0,x,9.B8,.33,.F8
57.38.79.F8、74.38.9。、w。9。BB.35.F8、67.38 .69、F8.72.38.9。\*,、9.58.37,F8。66 .38
599 DATA68.F8.79.38.9.*.9.78.39.F8.65.38.9.*、9.98、42.F8、64.38.9.*,9,B8.45、F8.64、
38.9,%X。9.D8.45、F8.64.38.9,xX,9.B8.44、F8.64.38.9.*.9.98.5.88.43.98.44.F8.64.38.9,※
699 ` by Y.Ozaki Nagoya Univ. May 1984
ゲー ミソ
、 ヾ ン ェ ッ
の と だ ZIA7
の ど と /7 三 7 也
田 変 数 リス ト LT
DX.JDY…… 黒 ピー ス の 移動 先王 還
X.Y…… 黒 ピー ス の 座標 HH
PT.SP……GET,PUT 用 HHT
出 あな ぐす し だ 回 数 キイ
プ ロブ ラム 説明 HHTT
110 こ 140 初期 設定 THT
150-170 作画 (ライ ン ) 全
180-190 作画 (カラ ー)
200210 入力 待ち
220-230 画面 を くず す
240 ご 360 キー 入力 、 ピ ビー ス 秘 QO
動 〇
370380 完成 判定 Le
390 END 娘 理 肖
400 ご 420 ライ ン 用 サブ ルー チ
430 ご 530 ライ ン 用 デー タマ
540 完成 判断 用 デー マ
550 機械 語 デ ー タ
560 ご 590 カラ ー 用 デー タマ
田 チ ェ エッ フ ボ ポイ ント
ゲー ム 中 5 の キー を 押す こと 、
少し の 間 、
完成 図 ザ 見 られ ます
が 、 ご この 時 間 を 長 ぐ し だ い 人 は 、
300 行 の 上 〇 ORZ〆 テ 0 「O 999 の
999 を 大 きぐ する と 、 見 られ る 時
間 が の び ま す 。
まだ 、 繧 に 関係 の な い ド ツ ト
が で ます が 、 こ れ は 、 同じ ピー
ス が な いよ うに る だ ため だそ う
で 、 繧 が 完成 する と 、 き れい に
消え ます 。 衣 -6001 で グラ フ
イッ ク ガ つ パ ズル な ん て すご い 。
繧 は ちよ つと イマ イチ だ けど サ
イコ ー 党 。
今 い ちば ん 新しい 市 販 ソ フト を ミニ 紹介 。 これから ポ シ エ ツ ト で は 、 市 販 ソ フト 情報 の まひ か 、 い ろ ん な お も し る 情報 を 掲載 エル /
し て いき ます 。 み ん な の 意見 や 新 発 見 な ども どん どん 取り あげ て いく ぐ の で よろ し ぐ ( 詳 し ぐ は 98 一 99 ペ ー ジ を 見 て ね >
Wi
mW
の 人
キミ が 乗
科 りこ
グー む の は 、 新型 A- ウ
コ ニ ク ラン 6 回 転 や 木の葉 落 5
ー フ シイ PO て (4 タイ フッ
ング 。
操作 は ファ イタ ー (|
wetrdMs、 スバ
* ーー ンジ ミ エイ ゴー き
六 半 0W ル ん 発射 だ * の
クム t の も の は 、 MR な スペ
問 や や 弾 数 な ・ ゲ ー ム だ だけ We
で 、 遇 間 0 時
ます MAIvct22Kw
RINEYSDU3
、 徐 々
Soore 9G9
人 ム ピ ミ
シュ ウ ウ ン 。 あ だ なり /
Z ぎ
mW
セー ム 発 和
stem
WW
に 減っ て いく ん だ
7 は 1
和
る 。 よ か っ だ た
欠 Ge sk
和 和 0
ジ ら は 100
は じ ま る ぞ
JUN
じ 0 り 、 敵 を
4 機 し と め る と ま
まで 補給 され
5 WS 人
を 36
AA
と 4 こ だ な る 。 -
mW
LN
ヤ
3
う フ セ モ ノ 。 う
2
EE
ヽ 人
ー ノ バー ナ デ
この 爆発
3 つう が
ン な お な か いい ね
すま Se
483 BU 4
し 眉
し 1
Je-_a アツ
ウー
すす 3
は oc
ゃ [ 4 に
SI 0
ウフ イタ ー の MA て (4 こい っ
生け に メー ナ SR
に 2 で 人 Pe: の ゲーz の '
を っ な た もう 03 ん も
"サロ 2EAWLamM
2
WH
+ ト : 1
Ne
2
| EE 着き ( り
ビー ジッ ーー
っ Wo 量 =
提 Muu 放
、 半 人 は ご Xfy て A 和 組 。
が
り
だ
ノ
は ウ
f
le
の
歴
は
りり
10
20
3
40
5
60
70
80
90
199
110
120
130
149
150
160
179
180
190
200
219
220
230
249
259
260
270
289
290
309
310
320
330
340
350
369
379
389
399
4099
419
420
439
449
459
460
479
489
490
590
S10
S20
S30
S49
S59
560
579
589
So90
600
619
620
639
649
659
669
670
689
699
790
710
720
730
740
750
76U
770
780
790
800
810
820
830
840
850
860
870
880
899
399
919
.920
の と 7 了 7 ア 7
一変 数 リス ト オキ トキ
68 自 機 の 座標 すす す
DEFLNTA-Z:CONSOLE 9.25.9.1:WIDTH 49.25:PRINTCHR$(12) XA,YA…… 英 機 の 座標 ー キ トキ て
HE=34:AX=38:COLOR 2 0 0 ーー ウー キー AR 中 ……| ーー TELTTIL
FORNT=9TO14:READDR$ AR お 英機 デー ツ FLLTIT
FORNE=9TOHE:LOCATEAX,7:PRINTDR も :" "EAAX=AX-1:BEEP1 : BEEP9 : NEXTNE 2 SS か CN サキ
AX=38 : HE=HE-2:NEXTNT :OUT81.33:BEEP:WVIDTH40 ラニ エピ | Na TTTT
COLOR 7:LOCATE6.13:PRINT"4 < > 6 & Space bar" 張 司 敵 機 の 種類 の 判定 FTTTT
LOCATE9.18:PRINT"Strike space bar!":IF1INP(9)<>191THEN79EILSEPRINTCHR$( 12 ) ご W…… 新しい 敵 の 判定 キキ て
カ ~ メン
COLOR 7:PRINT" Score 09 Time BU 20 紀 且 8
RN…… 運 動 パ ター ン 決 定 用
COLORI:LINE(1、1)-(169.10) .PSET .B
FORNE=9T039:LOCATE INT(RND(1)x35)+2、INT(RND( 1)x2)+4 、
COLOR INT(RND(1)*7)+1:PRINT"・":NEXTNE 回 炎 同 の デー ダリ ー ド 用
シン ヨ キ セ ッ テイ
MS や お …… メ ッ セ ー ジ
X=29: AR$ も =" ドー" :XA=20:YA=5:Sw=9
TI299:BU=2:LBsSTFc9 OR 敵 欄 カ ラー
カス タム A ウ イン ク ~ ファ イタ ー SR…… ズ コア
COLOR7:LOCATEX-2.2tEPRINT" CA "(0
COLOR2:LOCATEX,22:PRINT"V" に し 世 目 機 の 数
IF TF=9THENCO0=5ELSECO= 1 軒 プロ グラ ハム の 説明
COLORCO : LOCATEXA- 1 ,YA:PRINTAR$
IFYA く >21THEN240 : ELSE2.39 10 一 120 画面 表示
IFX=XA OR X-1=XA OR X+1=XA THEN GOSUB720 130- こ 150 初期 設定
LOCATEX、22:PRINT" " 、
IFINKEY$=" "THEN GOSUB539 160<200 自 機 プ リン ト
IFINP(9)=239 AND X>3 THENX=X-1 5 思
IFINP(9)=191 AND X<36THENX=X+1 210 一 220 英機 に ぶつ お が つ だ が
4 2 0 230…27( キー サー チ
上 N RN=INT(RND( 1 ) *5 )
IF SWw<>9 THEN379 260 一 420 英機 秘 動
IFRN=9THEN RESTORE830 430<470 弾 数 、 エ ネル ギー 判
IFRN=1THEN RESTORE860 9
IFRN=2THEN RESTORE889 断
IFRN=3THEN RESTORE899 5 5
IFRN=4THEN RESTORE919 時 510 敵 出 現 位置 計算
SW= 1 520-700 ビー と 英機 撃墜
READ RX.RY:BEEP1 : BEEP9
LOCATEXA-1.YA:PRINT" 710 一 760 自 機 爆 発
IFRX=99THENGOSUB499 00 ン
IFXA>34THENGOSUB499 790-810 END 才 理
IFXA く 4THENGOSUB499 820-920 敵 の 動き DATA
XA=XA+RX:YA=YA+RY 還 チ ェ ッ フ ボ ポイント
COLOR 7:LOCATE26,1:PRU.TBU
Ti=TT-1:LOCATE18、1:PRINTTI
IF BU く <1THEN GOSUB 719
IF TI く <1THEN GOSUB 719
敵 の 動き も お も し ろく ぐ 、TIM
GOTO 189 ド
"タイ Fighter ノ イチ ト Dearth fighter OVER の 愛 委 が ある の で いい
SW=9:RX=9:YA=5:XA=INT(RND(1)x19)+12 の で す が 、 ハ イス コア 等 の 基本
IF INT(RND(1)x19)=9 THEN AR$="]@1" ETF=1 ELSFAR も = リト ロリ":TF=9 的 要素 が 不足 し て いる よう で す
1 ヾ O
RETURN
し ヒド エー ム ト Tiefighter ノ ルク ハツ
COLOR 2: BU= BD- 1
LINE(X.29)-(X。4)。 "1"
LINE(X.29)-(X。4)。" 「"
IF X く <>XA THEN RETURN
BL=XA:BR=XA:BY=YA
BEEP1 : LOCATEBL,BY:PRINT" く < くく "ELOCATEBR,。BYEPRINT リー >>『
IF BL く <5 THENBL=5 ELSEBL=BL-2
IF BR>34THENBR=34 ELSEBR=BR+2
BEEP09
IF BL<5 AND BR>33THEN639:ELSE580
LINE(2.YA)-(38.YA)。" “
[F TF=9 THEN 679
COLOR7:FOR_ NE=9TO59:LOCATEXALYAEIPRINTT3090" ELOCATEXA、YAEPRINT"
NEXTNE: SR=SR+260
GOSUB490
SR=SR+49:COLOR7 ELOCATE7、1:PRINTSR: BOO=BO+ 1
IFBO=4THENBO=9:TI=299:BU=20
RETURN
A-Wimn9 ルク ハツ
IFBU く 1THENBU=109:MS も ="BuUlle1 1S noO!"
IFTI く 1THENTI=199:MS$= "Tijmne 1S OOVCF
FOR _NE=9TO69:BEEP1:LOCATE15.19:BEEP9:PRINTMS も ENEXTNT
LOCATE15.19:PRINT“" "iMS も = リリ
FORNE=9TO29:BEEP1 :OUT81、33:WIDTH49:BEEP9: NEXTNE
COLOR7:LE=LE-1:LOCATE3S 、1:PRTNTL 上
まだ 、 ゲ ー ム で 自 機 は 、20 発 の
ビー ム (英機 乾 発 で 20 発 補 結 )
し ガ 使 えな い の で 、 蛋 生 に ……。
TIME を 変え る 場合 は 、150 行
200 を 適当 に ガサ えよ う 。 ビ
ー ム 弾 数 の 場合 は 、90 行 お よび
150 行 の BU の 数 値 を ひえ れ ば よ
し 。- 表 / パ ッ チ リ 抽 。
1F LE< >9THENGOSUB499:RETLUIRN
Game Over Sub
COLOR 7:LOCATE19、19:PRINRT"TG 3 m e oO V Ge T"
LOCATE19.12:PRINT"StYike 「sS。 key "EEWAIT4.8.255:RIIN
DATA SJTJAJ、R。 .WJA、R. ら 65、 、F,T.G,H.T
DATA 0919 1.90.1、0 ま 0 1 見 13 1 、1 1 1 1 し 、0。 に 1 。@ 、) ,、) =1
DAT 和 AA 1 ルー! で 1 0 | のり 、 こ 1 。 こ =] と 1 1 と 1 デー) 91 0。<1 、W =1 1
DAFA ニー1。 も 、 こ 1/1。 攻 も 人 、1、 も 、15 ま 1、 ト し 、 1 2 と 2 に の 12) 1 2、 ト 9 6
AT 敵 あり も > まっ 小作 と 1 、 上 ゃ や も ニル よこ すす トニ ルル 。 5
DATA -1,1.99.9
2 は 0 2 作り 。 作 の 0 トー 。] 0 りり 0 。1 1 99。09
DA も 2 8 も 10 も キ 。 0 は 20 キッ テト) こま ん / ド ん = と も 1
DD 作っ ト 人 攻 と も トド の の が 人 1 も も 、1 1 1 1 021 0、 も 9 の 7。 具
DAA 229 2 と 9。2、 有 0 2920、2。 ま 2 1 1 1 の 、1 9.。1 90。1 0、1 1、|、- う
DATA 0、-1.9,-1.9.-2.9、-2.9。- つ 、9、-2.90、-2.9.-2.99.9
ヴォ ル ガ ー ド デー ビー ソフ ト (会 011-251-7462) PC-8801,mk II・FM- 7 /77・X 1 (C) の テ ー プ \4,500、3.5・5 イン
チ デ ィ ス ク (X1 用 除く ) \6.800 信 高 度 な は スク フ ロー ル 型 シュ ー テ ィング ゲー ム に 3 機 が 合体 する メカ アニ メ の 楽し さ 。
7 の
レゴ 4 2/2/- こ ざー ん /
W
生 UUMM
・・ お ぐ G 半 お SE PGNT
*・ く PL CE 内 谷 鈴
・・ マ の は
*・・ ヤ OH は て 選 ひ 角 お う
・・S す の 多 だ
"て まう か アマ <②2) の
4 プロ ・ レ ベル ガ ア マ ・ レ ベル が 選ん
で ね 。 も ちろ ん 最初 は 素直 に の か ら 。
あ だ り 一 常 は ダイ ヤ ト ロン 工場 。 キ
ミ の 使命 は 、 ダ イヤ トロ ン 工 場 を 監視
する ポリ スマ ン か ら 逃 げ つ つ 、 工 場 を
次 々 に 爆破 し て いく こと に ある 。
I214I6I8|I キ ー で 上 下 左右 !
か し 、 0
移 に ぶ て 体 当 た りす る と 、④ ゐ が @ に
了 了 22PO RE
。 ふ へ VMAIV
NKK と
QOLTIH-O
dS 洒 清 江
ン 包 天 当
計 w 幸 9 コ ニキ 2
| で 退き er irv 天 本 は ひき gm 圭 S |
| 宮 凍 癌 件 深 弄 は cm m ロ コーmS( 2S |
AJ 避 さ 敵 壮 S 滋 束 三 ざ 沙
| 串 作 湊 刺 。AVNVQOOIIH-OdS (本
_ ar {1 DR
回 の ご 半 さよ) 半 妥 計 丈 は
| と
〆 の
- ぶ を 動
この タイ マー の マー ク が 全部 消え ん な い
うち に 、 工 場 の 真中 に ある 葵 や アル フ
アベ ペ ツ ウド に 全 導 だ の し よう 。 そ で の が
い 丸 に な っ だ たら 、 時 限 爆弾 セッ ト 完 了
だ 。 爆 発 に 巻き こま れ な いよ う 、 る きっ
と 送 け な く て は いけ な い 。
に ある アル ファ ベッ ト は 、FIREBUG
の 順に と っ て いく と ボー ナス が も ら え
る 仕組 み に な っ て いる 。
順番 が 違っ た り 、 途 中
で 劉 を 胡 破 し た りす る
と ボー ナス は 無効 。
の 7 の を ちょ いざ ちゃ ゅ
ご 動き まわ る ポリ スマ
ン は 、 キ ミ を 見 つけ る
と 1 発 ビ ピス トル を 打っ
GDHODG は
主 失せ 谷
2
マ バ パスワード を 完成 さ
紀 MS 4
工場 の な か
て て る 。 これ を 防 で に は 、 身 あか くす
MAEDA
を 記 久 か えた し て し まえ を ば いい 。 ぐ で の 大
は ボリ スマ ン の 進行 を くい とめる 働き
が あり 、 無 制限 に バラ まけ る の で お お
い に 活用 し よ う 。 石 が ジャ マ に な っ た
ら |Z| キ ー で リセ ッ ト も で きる 。 手順 が
大 切な 思考 型 リ ア 9
文 参 考 「 テ クノ ポリス 」583・8 、『AS
TEROID WARS ゲ ー ム 」
る? <
人
な の くま > G3 34| |
@⑳G ぐ 5 > 5
甘 | P 衣 GE
DD DL
2 で
に
の 6 くに で で う
ント りす で を る 4
0、* に ココ : 」
Re ee
人 4 主
bc に ゴ
の どど だ ZHA7
の と /7 ビ 了 了 所
19
2
39
40
SM
69
79 COLOR6 , &H29,9:PRINT CHR$S(12):
80
[[FIRE BUG]] 1984 年 6 月 16 日
WIDTH49,25:CONSOLE9 ,25.9,1:LOCATE19.12:PRINT "チョ ッ ト マッ チ 11 "EGOSUB1539
人 eco ツウ 当 セツ アゴ や で らら っ ご
DEFINT A-Z:DIM D(11),.DC(11.31):GOSUB 1319:HS=9
DEFUSR9=&HD999 :DEFUSR1 =&HD193:DEFUSR2=&HD1DA:DEFUSR3=&HD1DF
DEFUSR4=&HD1E4:DEFUSR5=&HD1E9:DEFUSR6=&HD1B8
SC=9:YB=9:BOM=9:MAN=&HE8:MNO=6:LVK=1:PAGE= 1
99 FOR 1=3 TO 11:BEEP1:COLOR6:LOCATEI,3:PRINT" FIRE" ij :BEEP9: BEEP 1
199
119
129
139
COLOR6:LOCATE28-1.3:PRINT"BUG "5 :BEEP9 : NEXT
FOR J=9 TO 2:FORI=9TO1:BEEP1:LINE(19-1,1-I)-(21+I,5+1) "| リ B:BEEP9:NEXT
FORI=9TO1 :BEEP1:LINE( 109-1,1-1)-(21+1.5+1) "XX"。RND(1)x7+1.B:BEEP9:NEXT: NEXT
FORI=9TO03999:NEXT:FORI=9TO15:COLOR2:LOCATE1 8:PRINTLEFT も ("ーー ゴー ク ヒ シレ イ --" 1)
BEEP1 :FORJ=9T099:NEXTEBEEP9: NEXT
149
FORI=9TO1599:NEXT:COLOR4:FORI=9T037:LOCATE9,9:PRINTLEFT も ("キミ ノ シメ イル タイ ヤ ト ロン コ
ウシ ~ ヨウ ヲ カイ スル コト タ ^~11"。1)j:BEEP1 :BEEP9:FORJ=9T0159:NEXT:NEXT
159
FORI=9TO1999:NEXT :COLOR3:FORI=9TO13:LOCATE25,19:PRINTLEFT も ("サン トウ ブー イノ ブル ・・・ "1
)::BEEP1 :FORJ=9T099:NEXT:BEEP9 : NEXT
169
179
189
199
290
219
220
239
249
259
260
279
280
29
3909
319
329
339
349
359
COLOR5 : LOCATE5 , 12:PRINT "< KEY >":
COLOR6:LOCATE8,14:PRINT"8"5:LOCATE8.18:PRINTT2"ELOCATE6,16:PRINT"4 $ の 0 67:
POKE&HFA1A,&HIE:POKE&HFB9A,&H1F:POKE&HFA99,&H1D:POKE&HFA94.&H1C
COLOR7 ILOCATE1.20:PRKINT [XX]・・STONE SETT :
LOCATE1.21:PRINT "【[Z]・・STONE RESET "
COLORS iLOCATE21.12:PRKINT "< く CHARACTER 25
COLOR4:LOCATE19,14:PRINT "@ "75:COLOR7EPRINT "・・BOMB SET POINT"5
COLOR1:LOCATE19.16:PRINT "9 ECOLOR7EPRINT "・・POLICE MAN"
COLOR6:LOCATE19.18:PRINT "の 95 ECOLOR7EPRINT "・・Y0U" 5
COLOR6 :LOCATE19.29:PRINT "まま ECOLOR7EPRINT "・・YOU (BOMB) "5:
COLOR7:LOCATE19.22:PRINT"※・・STONE" 5 ELOCATE8,24:PRINT" プ ブロ =(1) or アマ = ミ (2) 7275
A$=INKEY$:IFA も =" " THEN 279
A=VAL(A$):IF A>22 7 ) A<]1 THEN 270
LOCATE 27.24:PRIN Ai:LEVEL=A:AA=USRS (9 )
COLOR5 , &H29.9:PRINF CHR$(12):
MX=14:XM=MX:MY=12:YM=MY:HOUSE=9:WCK=1:FOR IT=&HE999 TO &HE9A9:POKE 1,9:NEXT
POKE&HE999 ,MX+ 1 :POKE&HE991 ,MY+1:POKE&HE992.D(LVK) :POKE&HE994 9:GOSUB1459
So し が ググ 4 どー ロラ ーー うこ
1=9:FOR Y=1 TO 21 STEP4:FOR X=9 TO 25 STEP6
1=l+1:TF DC(LVK, IT)>6 THEN A=FIX(DC(LVK,1)/19):M$S=MID$( "FIREBUG" ,DC(LVK,T)-A※
19,1):GOTO379
369
J79
380
399
499
419
420
439
4409
450
460
479
480
490
S99
っ 1
ゃ アス /
つ さ の
っ 49
c】
S69
っ 70
S980
S99
699
619
620
639
649
6509
669
679
680
699
799
SE
M も ="@":A=DC(LVK, 1 )
ON A GOSUB 399,419,439,459,479,489
NEXT:NEXT:GOTO 599
COLOR5:LOCATE X,YI:PRINT "に ELOCATE X,Y+1:PRINT 中 還 較 :
LOCATE X,Y+2:PRINT "の ハ 昌 "7:COLOR4 :LOCATEX+2.Y+1:PRINT M$ も ) :RETURN
COLOR5:LOCATE X,Y:PRINT "イネ 、/W "5 ELOCATE X,Y+1:PRINT "| 画 還 に (
LOCATE X,Y+2:PRINT "3、 COLOR4:LOCATEX+2.Y+1:PRINT M も Bi ERETURN
COLOR5:LOCATE X,Y:PRINT "人 衝 キ RA" :
LOCATE X,Y+2:PRINT " キ "ECOLOR4 :LOCATEX+2。Y+1:PRINT _ M$ も : ERETURN
COLOR4:LOCATE X,Y:IPRINT "ゴゴ MV" IIELOCATE X,Y+1:PRINT "Lo PT
LOCATIE ル .Y27PRKINT ん の 17RBTIURN
COLOR4 :LOCATE X,Y:PRINT "会 、 全 に に に ELOCATE XY+2:PRINT "ERETURN
COLORG2LOCAIE XYYPRINU / 光 ILOCAID YOTIIFRNINI “ 暫
LOCATE XY+2:PRINT "ニー "ECOLOR2 ELOCATE X+12.Y+T1EPRINT の 5:RETURN
ELTNE(30.9)-(30.24)。 "1 3ALTIMNE(32.9)-(32 24)。"1" 35LINE(31 .9)-(3 は 1 、24) 。 m 2
FORI=1TO8:COLOR5:LOCATE31 IE:PRINT MID も ("TIMER. "1.1): ENEXT
COLOR2:LOCATE33。 1:PRINT "FIRE" 1 ELOCATE35。 2:PRINT "BUG"
COLOR6・LOCATE33。9:PRINI "※※※※※ り "52:LOCATE33 3:PRINT |※※※※※ り <
COLOR7:LOCATE34 21:PRINT "PASS":
COLOR6 :LOCATE34.23:PRINT "FIRE": ELOCATE35 ,24:PRINT "BUG"・
GOSUB 1269
ん 誤 愛生 生き こさ そこ AME ST 人 AE1 ニニ ニニ ニニ ニニ ニニ
Sa MAIN MOUVE Gt3 。 ーー ニー ニー ニー ニー ニー
A=INP(9):B=INP(1)
IF INP(5) く >254 THEN SW=9
IF A=191 THEN IF MX く <29 THEN MX=MX+1:GOTO 669
IF A=239 THEN IF MX>9 THEN MX=MX-1:GOTO 668
IF A=251 THEN IF MY<24 THEN MY=MY+1:GOTO 669
IF B=254 THEN IF MY>9 THEN MY=MY-1:GOTO 669
GOTO 749
P=PEEK( &HF392+1MXX2+MYx120)
IF P=&HEC THEN GOTO 1229
IF MAN=&HEB THEN IF P<&H56 THEN IF P>&H41 THEN GOTO 899
IF P=&HE9 THEN IF BOM=9 THEN BEEP1 :MAN=&HEB: BOM= 1 : BEEP9
IF P=&HA5 OR P=&HEA THEN LOCATE XM、YM:PRINT" "5 EGOSUB1169:IF MNO<=9 THEN829E
959
人 デー ミン ケ 自伝 説 ツ クリ スタ ル ソ フ ト (会 06-326-8150) PC-8801,mk II へ 5 インチ ディ スク Y\6.800 欠 赤 き 王 と 青き 王 を 見 つけ 出 レ
の )、 ッ た / 及 万 ある い は 2 人 と も 殺す か 、 助 ける か …… ゲ ー ム エン ド は な ん と 通り も ある 。
の
に JINHNJdD 深
j 悦 omm ら AN は へ て G+ SL HoH9t 2 み dBH の 違 王 と HN' 慎
いい
まで 当 び へ
JWN 【 1
FIRE BUG リス ト 続 き
ピル /
710 IF P=&H2A THEN IF INP(5)=251 THEN COLOR4 :LOCATE MX,MY:PRINT "+"::AA=USR33( ) :
LOCATE MX,MY:PRINT " ":
729 IF P く <>&H29 THEN MX=XM:MY=YM
739 LOCATE XM、YM:PRINT " "の :
749 IF SW<>1 THEN IF INP(5)=254 THEN SW=1:SX=MX+(A=191)-(A=191)*(MX く = り )-(A=239) :
っ Y=MY+(A=251 ) -(A=251 )x(MY<=9 ) -(B=254):IF PEEK(&HF392+SXx2+SYx129)=&H29 THEN LOCA
TESX,SY:COLOR7 :PRINT "%"::AA=USR4(9 )
759 COLOR6 :LOCATEMX 、MY : PRINTCHR$(MAN) : : XM=MX : YM=MY : PORE&HE999 ,MX+1: POKE&HE991,MY
769 IF BOM<>9 THEN IF TIME$<>T$ THEN GOTO 989
779 IF INP(5) く <>254 THEN Sw=9
789 '-- POLICE MOVE (マシ ンコ ^ サフ ルー チン ) - -
799 TM=TM- 1: IFTM く =9THENTM=LEVEL : AA=USR9( 9 ) : IFPEEK( &HE994 )=1THEN GOSUB1169:IF MNO
く =9 THEN GOTO 829 ELSE GOT0959
809 GOTO 599
G100 "ニーーーー ニ ニニ ーー GAME TS OVER ------ーーーー-
9290 PRINT CHRS(12)::COLOR4 :LOCATE2,5:PRINT "xxxxxxX GAME OVER XXxXxXXX":
839 IF SC>HS THEN HS=SC
949 COLOR5:LOCATE 8,19:PRINT "YOU SCORE=" : SC
859 COLOR6:LOCATE 8,12:PRINT "TOP SCORE=" :HS
869 COLOR7:LOCATE 3.15:PRINT "PLAY AGAIN (HIT RETURN KEY!! ) ":
979 IF INKEY$ く >CHR$( 13 ) THEN 879 ELSE 79
86889 ”'--- 用? ス ワー ト ~ チェ ッ ク ---
999 BEEP:FORI=1TO7:IF P=ASC(MID$("FIREBUG" , 【,1) ) THEN IF WCK=I THEN GOTO 919
399 NEXT:GOTO 1249
319 COLOR7:LOCATE33+ ( (WCK>4 )x-1+4x(WCK>4 ) )+WCK, 23+(-1x(WCK>4) ) :PRINT "-":
92Z9 WCK=WCK+1:IF WCK>7 THEN OUT81 ,33:AA=USR5(9 ) :OUT81.32:FOR 1=1 TO 29:SC=SC+39 :
AA=USR4(9):GOSUB 1269:NEXT
939 GOTO 1249
949 "ーーーーーーー ニ ーーー ALL RESET ----ーーー ニ ーー ニー
959 GOSUB1269:AA=USR1 (9 ) :POKE&HE994,9:FOR 1=&HE995 TO &HE9A9:POKEI , 9 :NEXT
969 GOSUB1459:GOTO 599@
97 人 9 "ーーーーーー ニ ーーー TIMER _ MOVE ------ ニ ーーー
389 FOR I=1 TO BOM:BEEP1 :LOCATE 31,YB:PRINT " "::YB=YB+ 1 :T$=TIME$: BEEP9
999 IF YB=>25 THEN GOTO 1999 ELSE NEXT:GOTO 799
1999 IF BOM=2 THEN GOTO 1939
1919 IF BOM<>1 THEN GOTO 7986
1929 GOSUB1169:IFMNO=9THEN GOTO 829 ELSE GOTO959
1939 FOR 1I=9 TO 2:LINE(BX+I+1 ,BY+1 )-(BX-1-1,BY-1) "XX"、RND( 1)x7+1,B
1949 FOR K=9 TO 39:BEEP1 : BEEP9 : NEXT
1959 IF PEEK(&HF392+MXx2+MYx129)=&HF9 THEN GOSUB 1169:P=1
1969 AA=USR6(9) :NEXT:FOR I=2 TO 9 STEP- 1
1979 FOR J=9 TO 8:NEXT:LINE(BX+I+1 ,BY+])-(BX-1I-1,BY-1)," "5,B:NEXT
1989 LINE(BX+2。BY)-(BX-2,BY) ,""。2:LINE(BX+3,BY+1 ) -(BX-3。BY-1 ) 。"H"。3。B
1999 HOUSE=HOUSE+ 1 : SC=SC+39 : GOSUB1269 : BOM=9 : YB=9 :MAN=&HE8 :LINE(31 .9)-(31,24 ) 。" 硬 "
>2:IF MNO=9 THEN GOTO 829
1199 "ーーーーーーー ニ ーー PAGE 1UP -----ーー ニ ーーー
1119 IF HOUSE く >29 THEN IF P=1 THEN P=9:GOTO 959 ELSE GOTO 799
1129 LVK=LVK+ 1 :PAGE=PAGE+ 1 : AA=USR5( 9 )
1139 IF LVK=11 THEN LVK=1:FORI=1TO04:OUT81 ,33:AA=USR3( 9 ) : AA=USR2( 9 ) : OUT81 .32:AA=U
SR4(9) : NEXT
1149 PRINT CHR$(12)::J=9:FORI=1TO MNOx19:J=J+19:COLORRND( 1 )x6+1:LOCATE13.12:PRIN
TP BONUS ="jiJ:AA=USR4(9) : NEXT : SC=SC+J:FORI =1TO1999:NEXT :MNO=MNO+2:GOTO 399
1159 "ーーーーーー ニ ーー ニーー MAN DEAD --ー-ー-ーーーー ニ ーー ニー
1169 FOR 1=1 TO 19:COLOR3:LOCATE MX,MY:PRINT "XX"::AA=USR3( 9 ) :FORJ=1 TO 49:NEXT
1179 COLOR2:LOCATE MX,MY:PRINT " 十 "::AA=USR2(9) :FOR J=1TO39 : NEXT : NEXT
1189 LOCATE MX。MY:PRINT " "::MNO=MNO- 1 :MX= 14:MY=12:XM=14:YM=12
1199 MAN=&HE8:IF BOM く >2 THEN BOM=9:YB=9:LINE(31.9)-(31,24) ," 画 ",2
1299 RETURN
2 こっ こっ やら テー の BOMB SE ーー ニー ニー ニー ニー
1229 IF MAN く >&HEB THEN MX=XM:MY=YM:GOTO 739
1239 IF WCK>1 THEN WCK=69
1249 BEEP1:MAN=&HE8:COLOR2:LOCATE MX,MY:PRINT "O"::BEEP9
1259 BOM=2:BX=MX: BY=MY :MX=XM:MY=YM:GOTO 739
1269 COLOR7:LOCATE34,5:PRINT "HSC. "iLOCATE33 、 6 :PRINTUS ING" 本 持 提 圭 #":HS
1279 LOCATE35.8:PRINT "SC. "ij:LOCATE33 , 9: PRINTUSING " 杜 持 # 壮 " 1SC
1289 LOCATE35、13:PRINT "MAN"i:LOCATE35 ,15:PRINTUSING"# 半 " : MNO
1299 LOCATE34,17:PRINT "PAGE"i:LOCATE35 , 19 :PRINTUS1NG"#":PAGE : RETURN
1399 '--- 力 ~ メ ン セ ッ テ イ DATA ---
1319 RESTORE 1339:FOR I=1 TO 19:FOR J=1 TO 39:READ A:DC(I,J)=A:NEXT : NEXT
1329 RESTORE 1439:FOR I=1 TO 19:READ A:D(I)=A:NEXT:RETURN
9 DAIA 3916.1J3.5、23.1 27 8.24.4.95。4.9、1、4.8.4.12.5.11 2 1.5.96.2.6.2.9
4 DATA 115.1、). 259.4 人 10.4 2704、1 6 1、4.8.4、3.4.3 1 22 6.28.14.2。2.6、2.2
5 は DATA 0 20 9 の 361 12) 。) 9 5 3054.6.36.4.3.5.242 1。27 2.4.422.1.14.6
59 DATA 140.6)4 111160.1 19 . 15.9。5、1 6.5、5.98 2.29。2 う 2 2.24、2.25.5.27 6
27 に DATA 99 2200.4 8、2.0202 グ 60626.2.5.2 41 9 17 4 1。16。8)】 1。4.8.6。393。4
よっ 。12。4。
>14.2.4.2.6,
POULICE プー コチ 0UR ブラ 5EY
RESTORE 1489:FOR 1I=9 TO 11:FOR J=9 TO 5
READ
FOR
DATA
DATA
DATA
DATA
D$:D=VAL("&H"+D$) :POKE &HE995+J+Ix12.D:NEXT : NEXT
1=9 TO 11:POKE &HE919+Ix12.9:NEXT:RETURN
96.91.96.91.99.91.18.18,18.18.99,FF,1E,99.1E,99.FF,90
EE。31.1E,、11 FEF、00、0C.18.0C.180.00.FF、1E。01 1E。91 。09.01
91.9D,91.9D,91.99.91.905.91.95,91.99,91.15.91,15,91.,00
2s MR 12 1 0 1 1E、01 IRM0) EPJ0U0、1D.19、(.1S。PF.00
POLICE MOVE PRG、 (マッ ンコ ゴ ^)
RESTORE1549:FORI=&HD999TO&HD285:READD も ED=VAL("&H"+D$):POKEI,D:NEXT: RETURN
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DD,。21 905.E0、3A,.02.E0 .32.93.E0、DD,7E,0B.FE, 909、28.96.3D,DD, 77 、0B,18,26
CD。A3、D0.3E、00、BC、26 61 BDD 20、SE、3EF,1F、BC.20.59.3B、14.BD,209.54.CD。F3
09.7E。 FE, EB、29 69.FE、E6。20.65. ド FE。20 04、09.D0:DD,66.、02 DD,6E。、08.CD、F3
93.36.29.DD,66、99.DD,6E,91.3E.EA,32.FF,DF,3E,28,CD,86,D1 ,DD,66,99,DD
6E,91,DD,74.92.DD,75,93.18.52.CD,16,D1 ,3A.94.E9 ,FE,91,C8,11.9C,99,DD
19.3A、93.E9.3D、32.93,E9,FE,99,C8.18,8A,CD,89.D9,CD,A3,D9 ,C3,3D,D9 , DD
7E,94、ED、44.DD,77.94.DD,7E、95.ED, 44.DD.77.95,CD,28,D2,C9 3E,91 .32.,94
E9、C9.DD.7E,94.DD,86,99.DD,77.99.67,DD,7E,95.DD,86,91.DD,77,91,6F,C9
DD,7E.98.FE、90,20.A/,DD,66,.99.DD、6E.91 .DD.74.06.DD,75.97,3A,99,E9,.DD
BE.99、28,29.3A、91、E9.DD,BE.91.C2.66,D9 ,DD,36 , 9A.99,3A,99,E9、DD, BE , 90
39.96.DD,36,99,FF、18.94.DD,36.99,.91.DD,36.98.91、CD,27,.D1 ,C3,69,D@,DD
36.99.99、3A,91 、E9,DD,BE、91.28.95.38,96,DD,36,9A,91 ,18.E2,DD, 36 , 9A.FF
18.DC,DD,7E,98.FE,99,C8.DD.66,.96,.DD,6E.97,CD、F3,93,36.29,DD, 7E,99,DD
86.96,DD,77,96、67、DD、7E、9A,DD.86,97、DD,77.97,6F,3E、99、BC、28 .37 ,BD, 28
き 人 9 反 -1E2 BC し 。 2 が 。2E、3E。1A BD、258.24.60D.ES.09.7E.FE、B9.28、1D、PE、BB。28.19
FE。2A,29、1F,FE。20.20.16.3E、A5、32,EF,DF.DD、66.06。DD、6E, 97 ,3E,E8.,CD。86
DIC9.3B.01.32.94。B0.DD,36.08.90、C9.36、20.21 。80.D2.CD ,F09.D1 ,19,F1 、B5
に DPO 0 1 CODESN 03.8A、NEODE 77 09.、21。01 0 06 20.C5.06。19 り BS CD。FS
903. /E。PE2EA.CC、 BBS .D1 FE、A5。(( BB5、D1 126 10.BD、 し 1 、2B.01 、24 .19.4.GC9
36,29.C9.3A、92.E9,47 DD,21.95,E9,DD,66,.92,DD,6E,93,CD、F3.93,7E、FE,F9
20.04. DD、96.08。15、11.WC 00.DD 19、10 9 の 0.20.02。19。0D、21.34.D2.19
な っ 2 ト 。 す 0 っ D019299.2 ル 4.44.02、CD、FO0.U) (9.5E、ES、CD. MD DI1、ML、20、)P。PE
し 9.19. す AE、0E、40、BB,、20.16.06.20 57 21.90.01、ED。41.CD.1D.D2.B5D。79.C
ID。D2.B/, ED、52.30)F1.C9、1C。47 18.E8S.。D5,16.96.15、20、PD。ID、20.P8)D1、C
19,95,.29.95.39,05、49,95,59.05.99,99.99.95,A9.9A.99,95,B9,19,C9、19,
99.91、FF、90,99.19.39.29,39.39.39,49.39.59.39,69.39.79、39.89.39 .99. コ
AD、39.B9.39,C9.39.D9 .39.E9,39,F9,39,E9.3 り 9,.D9.39.C9.39、B9,39,A9、39.90
39、89.39。79、39.69、39、59、39 .49.39、39,39 ,29.39.19.3 り 9,.99、99、FF、95.59,95
99、09
の だ ZIA7
の と /7 だ すず 也
レゴ 4 2/2/- ら ん /
画 変 数 リス ト ・ 20 一 80 初期 設定 ・ 810-870 ゲー ム オ ー バ ー 処 理 ・ 10 面 フリ アタ す る の は 、 な ガ な が
D0……-10 面 分 の ゲー ムレ ベル ・ 90-260 デモ 表示 ・ 880-930 パス ワー ド を チェ ッ : 至難 の 技 。 ゲ ー ム の 必勝 法 と し
DO ツ 10 回 分 の 区 、 プ ロロ に の 0 に 9206 ゲー ムペ ベル 規 3 の ・ て は 、 洗 面 ご と に 爆破 する 手順
ッ ク の 位置 デー ツ ・ 330-560 工場 ・ ブ ロッ フ ・ ス ・ 940-960 画面 クリ ア ・ や 逃げ 道 を 考え て 、 確 実に 、/ パ
回 生 ne PS 6 コア 等 の 表示 。 9/U221000 イイ マー を カウ ラン ・ テー に を 取 つ くし いく ここ で す 9。
SOC…… ス コア ・ 570-650 キー 入力 ト す る ・ MAN の 数 を 増やす に は 80 行
YB…… タイマー カウンタ 用 Y ・ 660-680 爆弾 セッ ント ポイ ント : 1020-1090 工場 爆発 処理 " ・ MNO=6 の ガ わ り に 、 入 れ だ
座標 か ・ 1100-1140 1 面 フ リア 処理 ・ い 人 数 を 入力 し て ください 。 ま
BOM…' 爆 弾 セ ント の フラ グ ・ 690 火 つ け 場 か ・ 1150-1200 MAN が 死ん だ と ・ だ 、 画 面 を か え だ い 場合 に は 、
MAN……MAN の キャ ラク ・ 700 ポリ スマ ン 、 弾 に じ あ ・ き の 処 理 ・ 画面 設定 デー タ が 1330 行 一 1420
MNO……:MAN の 数 5 大 の 局 の の ・ 1210 一 1250 爆弾 セッ ト ・ 行 に 入 つ で いる の で 、 その デー
LVK…… バ 現在 の ゲー ムレ ベル : 710 石 を 消す ・ 1260-1290 スコ ア 等 の 表示 ・ 中 の 2 ケタ の デー タ (40 の 位
PAGE…… 面 数 ・720 何 か に あ た だ つ だ か : 1300 一 1430 画面 設定 用 デー タ ・ が 工場 パ ツ ー ン ナン バー, 1 の
MX,MY……MAN の 座標 ":730 MAN を 消す ・ 14401510 位置 デー タ ・ 位 が パス ワー ドナ ン バ ー で FIR
XM. YM……MAN の 旧 座 標 :740 石 を 表示 ・ 1520-1830 ポリ スマ ン 、 各 サ : EBUG に 1 一 7 で 対応 ) を 、 敵
HOUSE-…… 爆 発し 工場 の 数 ・ 750 MAN 表 示 ・MAN の : ブル ー チ ンプ ログ : 当 に 、 か えて みて こく ださい 。 面
WOKoosJA2 人 用 の ウツ XY 座標 を マシ ン 語 ・ ラム の 読み 込み ・ 数 を 増やす に は 1130 行 と 画面 設
タ サブ ルー チン に 送る : (マシ ン 語 プロ グ ・ 定 デ ー タ 、 ポリ スレ ベル (1440
LEVEL,TM…… プ ロ 、 アマ : 760 爆弾 セッ ト ガ され て : ラム ) ・ 行 ) を 変更 。 だ だ し 、 ブ ロッ フク
の フラ グ ブ ・ いる か ゃ ・ 弄 チエ ッ フ ポイ ント ・ と 火 つ け 場 が つね に 10 個 で ある
SW……[X キ 一 が は な され だ か ・ 770 X キ ー が は な され だ : 設定 面 数 は 、 全 部 で 10 面 だ そ ・ よう に する こと 。 バ ッ チリ 賞 。
の フラ ブ か ・ う で す 。 1 面 フ リア ご と に 、M :
田 プ ロブ ラム の 説明 ・ 780 一 800 ポリ スマ ン 移 動 ・ AN が 2 人 プラ ス さ れ ま す が 、 ・
ジル
人 疫
7 ダー :
0 に な っ た だ とき 6 ゲ ー ム オー バー だ 。
TIME は 表示 る れ て いな いけ れ ど 、 終
[214I6I8I で 上 下 左 右 に 移動 し て 、 お わり 近く に な る と Beep 音 が 鳴る の で
金 を ひろ い 集め よう 。 お 人 金 は 全部 ひろ 注意 。
有 えば 、 ち ょ うと 借金 の 金額 と 同じ で 、 と きど き 立 て られ て いる STOP の 看
ペン 衝 び 方 0 科 作 人 0 3 寺 お 板 は 通行 禁止 。 NN 0
沈 が 返せ る の だ 。 お 人 金 を 返し だ ら 1 面 ん は それ も 乗り こえ て 追っ て くる ぞ 。
うう っ 、 地獄 の サラ 金 ゲ ー ム じゃ 。 2 参 考 「 マ イコ ン BASIC マ ガ ジ ン 」
ふと し だ た こと か ら サ ラ 金 に 手 を 出し だ た だ し 、 お 人 金 を 全部 ひろ いき れ な い 84・8、『COMMUNICATION」
て し まっ だ キミ は 、 あ れ よ あれ よ と い うち に サラ 金 の お
うま に ば う 大 な 借金 を 作っ て し まっ た 。 っ さん に つか まる
そん な と き 、 道 の あちこち に お 札 が 落 。 上 、 お 全 が か えせ 人
ち て いる の を 見 つけ た の だ 。 サ ラ 人 金 に 。 ず に ゲー ム オ ー バ *
手 を 出す な ん て よく な いこ と だ が 、 落 ー が 。 合
ち て いる お 和 金 を ネコ ババ する の は も っ お まわ りさ ん に 側
と わる い 。 と は 知り つつ も これ て 借金 見 つか っ て も (Y しい |
を か え そ うと キミ は 必死 に お 札 を ひろ 庫 標 が あっ た だ け 半生 | 人 ひか
まわ りさ ん が 、 を その 角 か ら は サラ 人 金 の に な る )、 ゲ ー ム オ 葉 。 吐 議 れ っ | っ の の ひひ の 必
お っ さん か が *…… キミ の 運命 や いか に 。 ー バ ー。 TIME が 、 人 ひ
ヽ ミ 』ー |
< 行き どまり ま こら の ら は ポ ボワ ス 、
で 追い こま れ 、 下 ガ ら は サラ 人 金 。 絶
体 絶命 /
人 ひひ の mm 仙人 の 還 人 の の の 合 人 の 合
の の の 人 の の 命 の ひひ の の
ひ の 合 人 仙人 の 仙人 鉛 合 人 の 合 合 人 人 の 合 人 の 人 の
EE 宇 呈 生生 生生 生 呈 】
19 WIDTH49.25:CONSOLE 9,.25,.09,1
29 CMD SCREEN 2.9.7:CMD CLS 3
39 DEFINT A-Z:0=5
49 DIM MO%X(29) ,TE%(49),GIX(49) 、OM%(49 ) ,IE%(49) ,STX( 40 )
59 GOTO 316
69 X=32:Y=16:TX=272:TY=169:OX=272:M=9:TI=100
7 ' 還 還 較 遼 騰 角 還 テイ ク クン 還 語 生生 騰 千 半
89 I9=INP(9):I1=INP(1):IF 1I9< く >255 AND 11 く >255 THEN 179
99 X1=((I9=191)x(STATUSPOINT(X+17,Y+6) く >1 )-([I9=239)*(STATUSPOINT(X-15,Y+6) く >1 ) )※
199 Yl=((I9=251)%(STATUSPOINT(X+1。Y+22) く >1)-(I1=254)x(STATUSPOINT(X+1.Y-9) く >1 ) )※
16
119 CMD LINE(X,Y)-(X+15.Y+15) ,9,BF
129 X=X+X1:Y=Y+Y1:IF STATUSPOINT(X,Y+8)=3 THEN FOR I=1 TO 29:BEEPIMOD2:NEXT 1I:M=
M+1:CMD LINE(X,Y+8)-(X+15.Y+15),9、BF:F=1:SC=SC+ 1 99
139 CMD PUT@(X.Y),GI%
149 IF F=1 THEN IF X=OX THEN WIDTH 49:FOR I=16 TO Y-16 STEP 16:CMD PUT@Q(X,1) OM%
・FOR P=1 TO 59:BEEP PMOD2:NEXT _P:CMD LINE(X,I)-(X+15。I+15),9,.BF:NEXT 1I:CMD PUT@(
X。1-16) ,OM%:LOCATE6 ,19:COLOR5 :PRINT "オカ ネ ブ ヒラ ッ タ ラ コウ ハー ン ニ トト に サヨ ウ 1 "EGOTO 779
159 F=9@
169 ' 画 還 張 簡 租 朋 間 サフ キン ノ オッ サン 生還 且 和 生生 硬 還
179 IF RND( 1 )x19< く 0 THEN 249
189 X2=((X>TX)\(STATUSPOINT(TX+29,TY+T3) く >1)-(X く TX)%※(STATUSPOINT(TX-12.TY+3) く >1 ) )
199 Y2=9:IF X2=9 THEN Y2=((Y>TY)x(STATUSPOINT(TX+4.TY+19) く >1)-(Y く <TY)x(STATUSPOIN
T(TX+4,TY-13) く >1 ) )x16
299 IF STATUSPOINT (TX+X2+1 .TY+Y2+15)=2 THEN X2=2XX2:Y2=2xY2
219 CMD LINE(TX,TY)-(TX+15,TY+15) 9,BF:IF PO0=1 THEN CMD PUT@(TX,TY+8),MO%:PO=9
229 IF STATUSPOINT(TX+X2.TY+Y2+8)=3 THEN PO=1:CMD LINE(TX+X2、TY+Y2+8)-(TX+X2+15,
TY+Y2+15).9,BF
239 TX=TX+X2:TY=TY+Y2:CMD PUT@(TX,TY) TE%
249 IF X=TX AND Y=TY THEN IF M<19 THEN 749 ELSE 820
25 ' 還 且 各 各 騰 科 妖 間 オマ リリ) 陳 語 講 且 用 重 各 間
269 X3=(INT(RND(1)x3-1))x16:IF STATUSPOINT(OX+X3+1 22)=1 THEN X3=-X3
279 CMD LINE(OX.16)-(OX+15.31).9,BF:OX=OX+X3:CMD PUT@(OX,16 ) ,OM%
289 TI=TI-1:IF TI<=9 THEN BEEP:BEEP:WIDTH 49:LOCATE 19.19:COLOR5:PRINT "キケン が
キレ タ !1 "EGOTO 779
299 IF TI<29 THEN BEEP 1:BEEP 9
399 GOTO 89
KB/ 還 = 瞳 た 5 証 .。 」
329 OUT 81.9
339 FOR I=9 TO 17:READ MO%(I):NEXT
349 FOR Ii=9 TO 33:READ TE%(T):NEXT
359 FOR I=9 TO 33:READ GIX(I):NEXT
369 FOR Il=9 TO 33:READ OM%( 1):NEXT
379 FOR I=9 TO 33:READ IE%( 1):NEXT
389 FOR I=9 TO 33:READ ST%(I):NEXT
399 COLOR 2
499 PRINT 部 還 還 還 日 較 間 前 聞 間 間 間 間 間 間 昌 昌 間 間 間 間 日 間 間 是 間 "
419 PRINT " 回 還 昌 回 較 較 回 較 | 較 還 胃 四 胃 上 "
429 PRINT " 加 。 還 間 間 時 細 間 間 間 間 間 間 間 還 因 還 間 回 還 間 昌 昌 昌 間 間 昌
439 PRINT " 回 回 虹 回 間 開 還 且 | 回 較 | 還 昌 | 還 昌 M
449 PRINT " 回 還 韻 還 間 昌 軒 了 昌 昌 間 間 間 昌 回 還 間 昌 衣 間 昌 回
459 LINE(9.12)-(38.12)." 三 "1ELINE(9.13)-(38.13) リー" 1ELINE(9.15)-(38.15) リー" 1
469 LINE(9.18)-(38.18)。"ー"。1:LINE(9、24)-(38.24) "一 " 。1
479 WIDTH 49
489 COLOR 4:LOCATE 19.9:PRINT "HIT ANY KEY TO START !"
499 IFINKEY$=" "THEN 499
599 SC=9
519 CMD CLS3:OUT 81,6
529 FOR Y=9 TO 176 STEP176:FOR X=16 TO 288 STEP 16
539 CMD PUT@(X.Y),IE%:NEXT X,Y
549 FOR X=16 TO 288 STEP272:FOR Y=16 TO 169 STEP 16
S59 CMD PUT@(X,Y),IE%:NEXT Y,X
569 FOR I=48 TO 249 STEP48:FOR P=32 TO 128 STEP 48
579 FOR X=1I TO I+16 STEP 16:FOR YsP TO P+16 STEP 16
589 CMD PUT@(X.Y) ,IE%:NEXT Y.X.P,1
599 FOR 1I=l1 TO 10
699 MX(I)=INT(RND( 1 )*4)x48+89:MY(I)=INT(RND( 1 )x8 )x16+49
619 FOR P=9 TO I-1:IF MX(P)=MX(I) AND MY(P)=MY(I) THEN 699 ELSE NEXT P
629 CMD PUT@(MX(I),MY(I)),MO%:NEXT I
639 FOR !I=1 TO 3
649 SX=INT(RND(1)x4)x48+89:SY=INT(RND(1)x8)x16+489
659 FOR P=1 TO 19:IF MX(P)=SX AND MY(P)=SY THEN 649 ELSE NEXT P
669 CMD PUT@(SX,SY-8),ST%:NEXT I
679 GOTO 66
DS 介 DATA さる 8 よこ キ ゥ ニート 。 ニ 1 1011 771。19299.13107 13299.13107。1911 77 1 =1 、 テ 1 =1 =1
690 DATA 32、16.16126.252.-256.255,-16384.3.-15616.195,-2S6 255。-19158 、-22434.-16
479,-21762。-20566、-21766。-21846。-21846,-21854、-39938,-21774,-28758,-21774、-28758
22991 ,29399,.21761.16469,.21595,16495.21525,21525
799 DATA 32.16,5376.84.21769.85,21765,29565,-3328,297,-256,255.32513.16637,21765
29565.21525 21589.21789.5205.21756 ,16213.21964.13141,-22916,170,-22914,-32598,。-
22518,-24534、-24566,-24566,-3841,-241
71 参 DATA 32.16.21921 ,16469 22176。149.21921 ,16469。-96.255、-3168.207 、-96.255 16368
,252.22995.29565.21781 ,21525,21769,5461.21769.3861,21769,-12459.768,-16192,21766
,85,21594.21 ,-22486,-22486
729 DATA 32.16.256.64、1289,89.5376.84.21769.85,21761.16469.22277,29693.24341.217
49.92533 21757。-235,21759,-233。-11609.31093.-3909.3987,、28725.3087.28725 ,-241 .2892
1,-241.28917,-241.28917
9B DATA 32.16.9. り 6.6 29, のり,。=1 。-] 。-1。-1、-1。-1、22487 22359,-8225.39583,-8233.22391
8201 、32631 。-6233.32599、-1 。-1 ,-1 。-1.32 .2046.32.2048 、32、2048
1/ 且 昌 | 還 0WOEE 較 |
759 FOR 1!=1 TO 4:FOR P=3 TO 2 STEP -1:FOR Q=1 TO 59:BEEP QMODP : NEXTQ.P, 1
769 WIDTH49:COLOR5 :LOCATE 19.19:PRINT "カネ カエ サン カイ コノ カ ~ キ !"
779 FOR I=1 TO 3999:NEXT |
789 CMD CLS 3
799 LOCATE 19.7:COLOR 4:PRINT "L[ GAME OVER 11 "LOCATE 8,11:COLOR 2:PRINT "アナ タ ハ
カリ タ カネ ブ カエ セナ カッ タ 。 "
899 COLOR7:LOCATE12.15:PRINT "SCORE "5SC:LOCATE 19、18:COLOR 1:PRINT "REPLAY. . .AN
Y _ KEY"
819 IF INKEY$=" "THEN 819 ELSE 599
829 WIDTH 49:FOR 1I=1 TO 39:BEEP IMOD3:NEXT:LOCATE 8.19:COLOR5 :PRINT "マイ ト ~ アリカ ~ トウ
コナ サ ナイ マス ! "FOR 1=9 TO TIX19 STEP 5:COLOR4:LOCATE15.15:PRINT "BONUS ":1:BEEP 1:BE
EP 9:NEXT 1:SC=SC+TIx19
839 0=0-1:IF 0=9 THEN 0=1
849 GOTO 519
の と ど だ ZH ル 7
し バイ // ゴメ ルコ ゴ
還 変 数 リス ト 寺村
MO%( ) …… お 金 の キヤ ラフ タツ 人 上
の GET デ ー タ HH
TE%() …… サ ラ 金 屋 の キヤ ラフ 上 還 四
クタ の GET デ ー ツ 還 四 |
GI%( ) … 自 分 の キヤ ラフ タ の
GET デ ー タ HH
OM%0 …… お まわ りさ ん の キ
ヤラ フク ノダ の GE「 合
デー タ Q
児 6 で 家 の キ ヤラ ノダ の G 1
ほ 上 た ーー QD
ST「%( )…… 看 板 の キ ヤラ フン Le
の GET デ ー タ We、
GO…… 2 OS」
XY アー…… 自分 の 座標 【/
上 T 多 TY…… サ ラ 多 屋 の 座標
(OK お まわ りさ ん の X 厚 標
X1.Y1…… 上 自分 の 進む 万 向
XY グ …… サラ 例 屋 の 進む 万
向
F…… お 笠 を と つ だ か
OS サラ 等 屋 の スピ ー ド
PO…… サ ラ 和 金屋 の 下 に お 金 が
MXO) で"" お 金 の XX 座標
MI YU tt お 人 金 の Y 座 標
ら 和 へ や Y…… 看板 の 座標
田 プロ グラ ム 説 明
10- 60 初期 設定
70 て 130 自分 の 秒 動
140-150 お まわ りさ ん に 見 つ
0 つの や
160-240 サラ 金屋 秘 動
250-2/70 お まわ りさ ん 秘 動
260-300 タイ ム 処 理
310-ー360 キヤ ラク タデ ー タ 読
み 込 み
390<490 ダイ トル
500 で 6/0 ズ スズ デ ー ジ
660…/30 キャ ラク タダ デー タタ
/40-610 _ END 処理
620 一 640 面 ク リア
田 チ エッ クボ イン ト
キヤ フラ ノダ と ゲー ム の 設定 が
な ガ な が ガ 。 サ ラ 和 釜 の お つ さ ん を 、
うつ まぐ 引き つけ な が ら 、 金 を 取
つて いく ぐ の が ボイン ト で す 。 時
間 を 長 べ し だ い 場 合 は 、60 行 T
|100 を ガ ひえ て ぐだ さい 。 娘 バッ
チリ 沿 。
ー ミ ング ^)、 ザ . プ ラッ ク バ ス ひ GA 夢 ニ ホッ ト ・ ビ ィ (会 03-360-3623) 〇 FM- 7 /8 /NEW 7・PC-8801.mkI 〇 5 イン チ デ ィ ス ク y7. の
バッ ェ ッ ん / 800 @ 本 物 の 釣り 気分 が 楽し め る シミ ュ レ ーション ゲー ム 。 ポイ ント や ルアー を 選ん で プラ ッ フ バス 釣り が 楽し め る 。
mW
UM
2
mW
mW pASIC
マゾ ツン と する よう な スピ ー ド
回 つの けけ て こる ⑨ 。 ワー ノ
を 利用 し て 逃げ ろ /
の TI TL WW
隊 和 0 0 aw mi 1 HLLLLTITIITIITTETTYP
- す く う カ ま の / ち 3 フ s 6 1 和 本 和 内 人
び の だ 。 | 、 ます SR し RS 円 き = 革 間 装 培 半 業 科 交
遊び < こ で 、 必 条 技 の 引 LT LLLELL
和 基
天 高 馬 肥 の ゆる 秋 な ん て いう と 思っ ワープ が 用 意 さ れ て 回生 CPPLLEEEEPLELEP IELLPP
だ だ ろう 、 な ん て の も むか し よく あっ いる の だ 。 層 だ け 、 | Ne
た 書き 出し だ けど 、 ま 、 要 する に ひ た 上 トト 左 右 の 壁 を 超え
に 全 - 症 - 生 六 生 生生
粗 着
すら ドッ ト を 食べ る 、14 行 の 超 ネ ニ サ る と 反対 側 に 出現 す LULUULLLLLLULLLLILLL
還 IEEE UM EMIUMEESEIMEESMEEEESSSSEE
オス ンジ 昌 グ アイ 必 。 の の 600 さき ESNENEESH ME S ENG ES ES SEESEEESAS
キミ が 操作 する キャ ラク タ は ^&/。 キミ は 1 面 全部 クリ Ci
モン スタ ー( @) か ら 逃 げ て ドット を ど / ア て きる か な ? {6
ん どん 食べ て いこ う 。 使う キー は 、 カ
= ツー の み 。,
が AA だ / ん で うだ り と 、 この が が ル が ん
ヵ 難 し い 。 結構 ス ピー ド が ある し 、 な
ん と いっ て も 、 敵 の アッ トマ ー ク カ が 異
1 SCREEN2 ECONSOLE,,9.9:COLOR12IC
LSEICOLOR1E 欠 =1:Y(1)=-1:X(7)=-1
2 Y(5)=1:XX(3)=1:A=39:B=14:U=A:V=
B:LINE(5,19)-(255,191) ,2,B:Y=1
3 LOCATEX,YEPRINT" "2T=ESTICK( 0 )
4 欠 =XX+ 炎 ( 十 )・Y=Y+Y(T): ド R=(SCREEN(X,
Y)=0): 火 =X-(XX= )※U+ (XX=31 ) ※U
O Y=Y-(Y=9)X※V+(Y=15)xXV:LOCATEX ,Y
・PRKINT"&"CHR$ も (R+8) :S=S-R
7 LOCATEA,BIPRINT "AA=A+TSGN( XX-A
):B=B+SGN(Y-B):LOCATEA,B:0=193
G IFX=AANDY=BTHENCLS:PRINTS:END
9 COLOR4:PRINT"@" ECOLOR1 EPRINTCH
R$ も (11)S:PLAY"L64DEC" EGOTO3 M.S
。 ぶ へ カ 円 く
HB 選 和 き w 「 吾 |
| 欄 」 肝 前 VNIYSVNNY ボ edC ミ い
。H き の 4(( 守 に NN ロ NIS 也 一 て き
CT 人 寺 史 当 填 ③ 革 中 耳 画 仁 栓 。YJ
_V 層 と で 仁 只 さ と と 0 ぎ NN 半 び の |
| なび 靖 に 正 革 ピロ デ ヨー の の の ー の で
男 変 数 リス ト ・R…… エ サ を 和食 べ だか (食べ だ : フ 敵 の 移 動 ・ な り 大 変 ど 。 こ の ゲー ム で は 、
XY…… 自 分 の 座標 = ・8 GAME OVER 判定 : あと 2 行 分 の 奈 裕 が ある 。 行
X( ).Y( )… 移 動 廊 向 ・S…… ス コア ・9 英 表 示 、 ス コア 表示 、 音 : に |= 1.9 行 を 10 行 に し て 、9 行
AB-… 敵 の 座標 。 : 田 プ ロブ ラム の 説明 -・ 圧 チ ェ ツ ッ フ ポイ ント ・ に IF S=270*| THEN |=|
U.V…… ワ ー プ に 利用 ・ 1-2 初期 設定 ・ 6001 は 、32X16 字 し か 納 ま ら : :GOTO 1 と すれ ば 、270 点 ご
T「…… カ ー ソ ルキ ー の 値 ・ 9ー5 自分 の 移動 ・ な い の で 、 ゲ ー ム を 作る の は か : に 面 フ リア 。 災 ヨッ シャ 党
26
木星 調査 団 が 謎 の 異 星人 に 攻撃 を 受
けた だ た 。 キ ミ は 4 機 の スペ ー ス シッ プ を
あや つっ て 、 手 強い 敵 と 戦う の だ 。
キミ の スペ ー ス シッ プ の 操作 法 は 、
カー ソル ・ キ ー の に 所 で 左右 移動 、 ス
ペー ス ・ キ ー で ビー ム 発 射 だ 。 ビーム /
は 連射 が びき な い の で 、 慎 重 に 使っ た
ほう が (いも A。
敵 の 攻撃 は 3 段階 に 分 か れ て いる 。
1. 大 型 ミ サイ ル
し な が ら 道 を あけ な いと クリ ア は 難し
Ks の だ 。
3. 赤い 流星
これ は ビー ム て 破壊 する こと すら で
きだ いい 。 だ だ だ だ 、 カ ー ツ ル ・ キ ー で
ょ け な が ら 進 む の み 。
この 3 披 階 の 攻撃 を 繰り 返し な が ら
敵 の 数 は 増え て い 〈。 高 得点 べ の 道 は
が が な か キビ ジオ ぞ で 。
^*. モ = リス ト 1 を 打ち こん だ ら 必 ず
まず SAVE す る こと (RUN
させ る と ブロ グラ ム が 壊れ る )、 そ し て
いっ だ ん RUN さ る
せ て か ら 、 リ スト 2
を 打ち こも う 。
この 攻撃 は 単調 だ か ら 、 慎 重 に 戦っ
て いれ ば クリ ア す る の は か ん た ん 。 人 据
力 ある 効果 音 が バッ ク に 流れ て いる け
ど 、 敵 は チョ ロイ 。
の 0 4 p al BE (|
これ は 手強い ぞ 。
左右 に ブル ブル と
揺れ な が ら 攻 め て
くる 随 石 群 は よ け
る だ け で も だ い へ
ん だ 。 効果 的 に ビ
ー ム て 限 石 を 破壊
一 変数 リス ト
LIST 1
New エラー 行 番号
dip タウ
M cuiees 面 数
N 6 パタ ダーン
AA…… 自 機 数
この 面 は わり あ
い ラ ク 。 せ い ぜ い
敵 を や つつ け よ う 。
な むけ お だ : 如 寿 5 放 BPREE ああ W は FUHTRRX
・ P……USR 命 令 用
・ 較 プ ロブ ラム の 説明
。 LIST 1
10- 80 マシ ン 語 DATA 読
み 込み
・ 90-960 マシ ン 語 DATA
e 小生 2
10- 40 初期 設定
| ら
| も
| 新
近
ド い
| 作
gie|
| を
| と
ん
| と
| ん
人
5 りり
す
QJ(( 生 四 デ ゴ
ど
AS は J ざ 落 へ す つ か の 中 和 きき 凌
の
_ VS の Qoo 。 半
ヽ AV で コー ロン |
の oo o- 〇 で こと こら 〇 の - 〇 で 幅
。 叶 叶 ど へ と 度 き 大 S 計 当 膨 AS
し eS 生 T へ 融
な に 日 E( 旨 月 HH5 有 HH BPHEE Pr HB. FHTRBST
4 隅 石 は 強い ぞ 。 攻撃 より も 防御 第 1 。
50- 70 画面 作成 ・ 音
0Zz000 イン ルー チン
・ 110-140 や られ だ と き の 処 理 ・
: 990400 の ーー ツテ
< 還 チ エッ ワ ボ ポイ シド
マシ ン 語 使用 プロ グラ ム 、 な
特に の 面 は クリ ア が 難し い 。 ま
・ だ 、 ハ イス コア 表示 べく らい は ほ
レ い 。 上 自分 の 数 は 、 LIST どの
・ 20 行 の A の 値 だ か ら 、 す ご に 終
・ わ つ て し まう 人 は 、 こ この 値 を
・ 増やし まし よう 。 娘 バッ チリ 賞 。
・ の で 動き は いい で すね 。 だ だ し :
・ ミサ イル が 連発 で き な い の で 、 ・
マン Z
溢 /009- つ プ @
DRNIN)aNNRII
$S 民 息 光 へ 中 否 ロ om ロロ AJ ば へ ざこ wrtvt9t rd の 理 で HI 革
ST
ンダ
PRINT'
N=199:FORI=&HF909TO&HF56FSTEP1 6
L=9:READA$ や ,B:FORT=9TO15
M$=MID$ も (A$,T%2+1.2):P=VAL("&H"+M も や も):L=EL+P: IFEL>255THENL=L し - 256
POKEI+TJPENEXT:IFB く >LTHENPRINT"?2SN Error in
N=N+19:NEXT '
FORI =&HE499TO&HE49B:READA も :POKEI VAL("&H"+A$) :NEXT
EXEC&HE499:PRINTTLOAD 1! "ENEW
DATACSDSES1A3C4721A1D91197991919FDEB,215
な り お まち く を "さい
DATAE1CD1BD923D113C119E6C9E596971A77,163
DATA13C591299999C119FS5E1C9D9EDSF4F3A,32
DATA28FA814F9797813CD9C91181D92100E2 ,196
DATA9629CD99D93AFDDAFE9A382AD69A32FD, 77
DATADA3AFCDA3C32FCDAFE9A381AAF32FCDA, 63
DATA3AFBDA3C32FBDAFE9A389BAF32FBDA3A, 1 41
DATAFADA3C32FADA11FADA2196E29694C300 , 209
DATAD99A9B9C9D9E1899999999991E1E191A,147
DATA1B1CID1E1E9F191E9A17111213141516,99
DATA1E999999999090999FCCCCCCCCCCCFC0C,39
DATA9C9C9C9C9C9CFCCC9CFCC9C9FCFCCC9C,194
DATA399CCCFCCCCCCCFC9C9C9CFCC9C9FC9C,12
DATACCFCC9C9C9FCCCCCFCFC9C9C9C0C9C9C,220
DATAFCCCCC39CCCCFCFCCCCCFC9C9C9CA888, 60
DATA89A89888A8A88889898988A8A8888888,128
DATA8888A8A98888A9888888A88989A88989,249
DATAA8A9A9A9A88888A8888888A8292020A8,48
DATA8989A9898089888888888888A8A82920 ,224
DATA20292929298888A8888888A88889A888,208
DATA88A8A82920202029A899999909992920,96
DATA29299999992020544449549444545444.224
DATA44544949491944445444444454444949,49
DATA494454544949544949549999900990909,212
DATA99CD2BD96F26E3C335D33A96DA47DD21 ,1096
DATA91DBC5CD81D1DD7599DD7491DD23DD23,1099
DATAC119EFC9CD2BD9E69F4FCD2BD9E69781 ,293
DATA9EE381FEFA39ED67CD2BD96FC97E9E9C,134
DATAA977C99632DD2197DACDA4D1DD7599DD,113
DATA7491CDBDD1DD23DD2319EE219FF72200 , 23
DATADA116BD3CD17D3AF3292DA32FEDACD81 , 245
DATA397D3299DBFE912998118FD3CD8AD118,157
DATA12FE92299811AFD3CD8AD1189611CFD3, 198
DATACD8AD1CD61192A99DACB6FC4E1D2CB67,77
DATAC4EDD2CB7FC4FBD2E52A99DA116BD3CD , 99
DATA17D3969C111E997EA7C44FD3237EA7C4.66
DATA4FD3237EA7C44FD31919ECE1116BD3CD , 98
DATA17D32299DA9632DD2197DADD6E99DD66, 139
DATA91CDBDD1 112099197CFEFACCA4D1CDBD , 229
DATAD1DD7599DD7491DD23DD2319DE3E9AD3, 126
DATAA9AFD3A1DD2191DB3A99DBFE912995CD, 163
DATAEFD3189CFE922095CDS9D41893CD29DS , 226
DATA3A92DAA7282F2A93DACDC5D2119991B7,72
DATAED527CFEE338982293DACDC5D21816AF , 28
DATA3292DA1819E511299906987E9E19A977 ,22
DATA1919F8E1C93E9A969919FE3D29F9C313,83
DATAD2F52B7DE61FFE1F2892F1C9F1F5237D, 251
DATAE61FFE1E2892F1C9F118E6F53A92DAA7,166
DATA2913E511FF99B7ED522293DACDC5D2E1 .98
DATA3EFF3292DAF1C9E5969C4E1AA9772313,186
DATA4E1AA97723134E1AA97713C5911E9999.,79
DATAC119E7E1C9E5D596194E1AA97723134E,62
"5 N:END
の と だ ZHA7
の と /7 だ 7 ア
DATA1AA97713C5911F9999C119EDD1E1C9FE,114
DATA9CC8E1E1212999C39B393E96D3A93E1F,139
DATAD3A13E9AD3A93E9FD3A1C9993C99993C,49
DATA99993C99993C99993C99C91493C95593,163
DATAC15543C51453D55557C91493C9999382,34
DATA98899888888888899892099209222920,158
DATA292329939993999FC99399939993999A,75
DATAA99AA92AA82AB8AABAAAAEAAAEAAAEAA, 20
DATAAEAAAAAAAAAAAA2AA82AA89AA99AA991,163
DATA49955994491554151411541544155495,151
DATA4911541545145595519514915999403A,162
DATA96DA47C5DD6E99DD6691118FD3CD35D3,195
DATAE596193E19111F99BE282D23BE282919,215
DATA19F6E1118999197CFEF82814118FD3CD , 127
DATA35D3DD7599DD7491DD23DD23C119C4C9,19
DATA118FD3CD81D118EA3AFDDA3C32FDDACD, 183
DATA45D9E1CD5AD33A95DA3C3295DAFE9F29,131
DATADFE1E1219999C39B39CD2BD9FE89D2B9 , 33
DATAD43A96DA47C5DD6E99DD669111AFD3CD , 233
DATA35D3E59619111F993E19BE282D23BE28 ,157/
DATA291919F6E1113F99197CFEF8281411AF,9
DATAD3CD35D3DD7599DD7491DD23DD23C119,29
DATAC4C911AFD3CD81D118EAE1CDFFD418F2 ,204
DATA3A96DA47C5DD6E99DD669111AFD3CD35 , 7 4
DATAD3E5111F993E199619BE282D23BE2829,145
DATA1919F6E1114199197CFEF8281411AFD3,172
DATACD35D3DD7599DD7491DD23DD23C119C4,14
DATAC911AFD3CD81D118EAE1CDFFD418F23A,66
DATAFDDA3C3C32FDDACD45D9CD5AD33A9SDA,77
DATA3C3295DAFE9FC9E1E1E1219999C39B39,117
DATA3A96DA47C5DD6E99DD6691 11CFD3CD3S , 196
DATAD3119991197CFEF8281D11CFD3CD3SD3,61
DATADD7599DD7491DD23DD23C119D73AFEDA ,94
DATA3C289C32FEDAC911CFD3CD81D118E1E1 ,239
DATA219999C39B3999999999999999999999,184
DATA21.99,F9,11.909,D9,91 ,70,06,ed,b9,C9
CLEAR 59,&HD999:POKE&HFAEB , &HC3:POKE&HFAEC , &HD 1
M=1:N=1:A=3:CONSOLE , , , 9
FOR I=&HDAFA TO &HDAFD:POKE 1I,9:NEXT
POKE&HDA95 ,9:POKE&HDA96 , 4+M
SCREEN 4.2.2:COLOR ,,2:CLS
EXEC&HD93A:SOUND 7,24:SOUND 1.15:SOUND 9.245:S0UND 8,19
SOUND 3,.15:SOUND 2.255:SOUND 9,19
P=USR(N):IF P=&H29 THEN 119
M=M+1:N=N+1:TF N=4 THEN N=1
GOTO0 49
FOR Il=15 TO 9 STEP -1:SOUND 7,55:SOUND 6,29:SOUND 8,1
LINE(PEEK( &HDA99)*8,172)-(RND( 1 )x256 ,RND( 1 )%※192 ) ,
A=A-1:IF A=-1 THEN 159
GO10 59
LOCATE7.2:PRINTTGAME OVER
LOCATE8.4:PRINT"HIT RETURN KEY“
EXEC&H10S58
IF INKEY$ く >CHR$(13) THEN 189
GOTO 20
1 : NEXT
ゲー ミン ミン グ ^)、 アレ ンジ ボー ル の PONYCA ニ ボニー (会 03-265-6377) PC-8801、mk TI の 5 イン チ デ ィ ス ク \4.800 テー プ \3.500 欠 バ 2 の
AA ッ ル ん / チン コ と ピン ゴ を あわ せ だ アレ ンジ ボー ル の パソ コン 版 。 ふつ う の ア レン ジ ボ ー ー ル より も パチ ンコ に 近い 感じ 。
溢 /009- つ ガ
ら ず 、 敵 の 上 陸 を 3 回 許し て し まっ た
ら キ ミ の 負け 。
PC-6001 が 勝つ か 、 キ ミ が 勝つ か 。
右 の 赤い グラ フ は 、 ノ ヤレ カン 砲 の カカ 適 確 な 判断 力 し スペ ー ス ・ キ ー の タイ
の 強 る を 示し て いる 。 力 の 強い と き に ミン グ が 勝負 の 分 か れ 目 だ 。
スペ ー ス ・ キ ー を 押す と 砲弾 は 遠く ま 文 参考 「PC-Techknow 6000」92 ペ
で 飛び 、 逆 に 低い と き に 押す ー ン の ザウ ンド 。
と 砲弾 は 近く に 落ち る よう に
RUN る せる と 、 あ る 海岸 の 風景 が 出 な っ て いる 。 一 度 、 最 高 と 最
て 〈 る 。 右 が キミ の 守る 要 寒 。 左 か ら 低 の と き を 試し て みて 、 ど 2 う
や っ て くる の が 、 敵 の 上 陸 艇 だ 。 ス ペ いう 具合 か 確か め て お 〈 と 、
ー ス ・ キ ー で ゲー ム ス タ ー ト 。 あと が や りや すい だ ろう ね 。
上 陸 艇 は 前 後 し な が ら 、 キ ミ の 要 寒 左側 の 赤い グラ フ は 時 間 を
に 上 陸 し よう と や っ て くる 。 を の 上 陸 表し て いて 、 一 定時 間 、 要 寒
艇 目 が け て ノ ヤ レ カ ン 砲 を ヒッ トミ せる を 守り きれ ば キミ の 勝ち 。
の が キミ の 使命 だ 。 夢 に 、 砲 ) 帰 が な か な か あ た
や つた だ 。 時 間 い つば いも ち ょ は ずれ / 敵 に あて る の は 難し い ぞ 。
こ だ え て パソ コン に 勝つ た ぞ 。
1 NN
HHtRHHH1GH
BB NNN
SGS
NAS
AA
NN
CN
NN へ NNN
NYA AA NN
NN
人
ク
ボ
い へ へ ヽ NN
SS AA
AN AA
NN
NN
は ご 旨 さ 0x 帳 栄 回
まま
2
み
汗 さ へ 和 糸 S 回 ゆ
1 提
な は
me
SCREEN3,2.2:CONSOLE9,16,9.9:HI=9:GOTO679
LINE(X1,.139)-(X1+15,143) ,2.BF:LINE(X1+7、149)-(X1+7,135) ,2,BF
S0UND7,56:PLAY"V15c64964":X=4:U=U+1:LOCATE12+0, 11:COLOR4:PRINT "大 ":
IFU=3THENLOCATE9 . 4:PRINT "PC-6991 八 アナ タニ カッ タ " ) : GOTO588
RETURN
Y=SGN( INT(RND( 1 )*5)-1)xX4:K=5:RETURN
X1=X:T=T+9.3:PSET(T,174),.3
IFT=>142THENLOCATE9 , 4:COLOR4:PRINT "アナ タ ハ PC-699 1 ニカ ッ タ "::GOTO589
X=X+Y:K=K- 1 :IFX=9THENY=4:X=X+Y
IFX=>189THENGOSUB20
IFK=9THENGOSUB69
LINE(X1.139)-(X1+15,143) 、1.BF:LINE(X1+7 149)-(X1+7。135) , 1
LINE(X,139)-(X+15、143),2。BF:LINE(X+7 149)-(X+7,135) , 2
IFC=1THEN3709
L1=L: し =L+6:IFL=258THEN1 89
LINE(L1,162)-(L,162).4:IFSTRIG(9)=1THENC= 1 : GOTO0299
GOTO079
LINE(192.162)-(252 .162) 3:L=192
GOTO79
SOUND7,7:SOUND6 , 31 :SOUND7 , 242:SOUND8 , 16 :SOUND1 1 , 9 : SOUND1 2 , 59
SOUND1,19:SOUND13.9:SOUND7 , 9
LINE(216.79)-(229.76),4:LINE(216,86 ) - ( 229 ,89 ) , 4
LINE(224.//)-(228、78),1.B:LINE(240.77)-(244.78) , 4。B
LINE(216.79)-{(229.76)。1:LINE(216、86 ) -(220 , 89 ) , 1
LINE(224.77)-(228.78),4.B:LINE(249.77)-(244.78),1.B
E=INT((L-192)/7)+1
ONEGOTO0289 ,290,399,319,320 、330 , 349 , 359 , 369
RESTORE999: READM,N:0=N- 1 :H=128:M=M+H:GOTO399
RESTORE899:READM,N:O=N-1:H=112:M=M+H:GOTO0390
RESTORE889:READM,N:O=N-1:H=96:M=M+H: GOTO0399
RESTORE879:READM,N:O0=N-1:H=89:M=M+H:GOTO399
RESTORE869:READM,N:O0=N-1:H=64:M=M+H:GOT0399
RESTORE859:READM,N:O=N-1:H=48:M=M+H: GOTO0399
RESTORE849:READM,N:O0=N-1:H=32:M=M+H:GOTO0399
RESTORE839:READM,N:O0=N-1:H=16:M=M+H: GOT0399
RESTORE820 :READM,N:O0=N- 1 :H=9:M=M+H:GOTO0396
M1=M:N1=N:O1=0:READM, N:M=M+H:O0=N- 1
SOUND7 ,244:SOUND6 , 31 :SOUND8 , 16:SOUND9, 9 : SOUND1 1 , 9 : SOUND1 2 , 255
PSET(M1 ,N1 ) ,1:PSET(M1 ,01 ) , 1
IFPOINT(M,N)=2THENV=4 :GOTO0439
IFN=143THENV=3:SOUND6,19:SOUND7,246:SOUND12.29:SOUND13.09:GOT0499
PSET(M,N) ,4:PSET(M,0) ,4:GOTO79
S0UND7 ,7:SOUND6 , 15:SOUND8,16:SOUND9,16:SOUND19,16
SO0UND12.99:SOUND13,9
LINE(X,139)-(X+15.143),.4.BP
ら S=S+19:LINE(144.9)-(199,11),1,BF
LOCATE8.9:COLOR4:PRINTS:
LINE(X,139)-(X+15.143),1.BF:LINE(X+7.149)-(X+7.135) ,1:X=4
LINE(M,N)-(M-8,N-19) ,V:LINE(M,N)-(M-4,N-14) ,V
LINE(M,N)-(M+4.N-14),VELINE(M,N)-(M+8,N-19) ,V
LINE(M-8,N-19)-(M,N) ,1:LINE(M-4,N-14)-(M,N) , 1
LINE(M+4.N-14)-(M,N),1:LINE(M+8,N-19 ) - (M,N) , 1
FORA=1TO5
LINE(M+(A-9) ,N+A)-(M+ABS(A-9) ,N+A) .V-2
LINE(M+(A-9) ,N+A)-(M+ABS(A-9 ) , N+A ) , 3
NEXT
C=9:GOTO180
FORA=9TO039:PRINTCHR$S( 7 )::NEXT
IFS>HITHENHI =S
LOCATE9,2:COLOR4:PRINT"HISCORE "HI:
LOCATE3.6:COLOR2EPRINT "GAME OVER"*
LOCATE3.8:PRINT "REPLAY く y>" バ
IFINKEY$ く >" "THEN639
IFINKEY$="n "THENSCREEN1 1.1:CONSOLE,」 1.1:CLS:END
IFINKEY$="y"THEN679
GOTO649
L=192:D=1:C=9:S=9:T=9:Y=4:K=5:U=9
COLOR1 :CLS
LINE(9,144)-(254.199) ,3,BF
LINE(192,.84)-(254,.143) ,2.BF
LINE(222.84)-(192.138),1:PAINT(294.198),1,1
LOCATE14.6:COLOR4:PRINT" イ "<
LINE(238,78) -(238,83)
LOCATE9 ,14:COLOR2:PRINT" タ イム" 5 ELOCATE9,13:PRINT "チカ ラ "【 ECOLOR4
LOCATE2.9:PRINT "SCORE" ELINE(9,174)-(142。174)
X=4
LINEIX、199)-(XT15,.143).2.BP:LINE(X+7 、140 )-(XfY 135 ) ,2 BE
LINE(48.69)-(296,71 ) , 1 ,BF
IFSTRIG(9)=1THEN709
LUCATIES、S)PREINT PUSH SPACE"j
GOTO789
DATA216,78
DATA200,78
DATA184,78
DATA168,78
DATA152.78
DATA136,78
DATA120,78
DATA194,78
DATA88,78
DATA89,79.72.82.64.84.56.88,.48.92。.49,199.32,115,24,139,16,143
プー ミソ
の だ ZH ル 7
の と /7 三 アア
一 変数 リス ト
Ne iRais の 和 間
HI…… ハ イス コア
に チカ ラウ ラン 時 栓
C…… リ リル カン 人 砲 発射 フラ ブ
T…… タ イム グラ フ X 座 標
Y…… 上 陸 艇 の 移動 廊 向
K…… 上 陸 艇 の 秘 動 回 数
X…… 上 陸 艇 の X 座 標
U……… 大 "の X 喉 標
MIN…… 爺 弾 の XX,Y 座 標
H…… 爺 弾 の XX 座標 調整 用
V…… 水 柱 、 火 柱 の 色
田 プロ ブラ
10
2 っ 00
60・110
70 一 190
0
60
90
100
120・130
140
150 一 190
200 一 250
260 一 360
370 一 420
430 一 460
490-570
580660
6/0~610
820-910
弄 チ ェ ン フン
慣 れ な い
当て る の は
れ ば 得点 が
ム の 説明
画面 設定
上 陸 有 艇 の 上 陸 処 理
上 陸 艇 の 左右 の 動き
決定
イッ ルル レー ノ
ダイ ム 用 グラ フ を
消し て 行こ
勝つ だ が か 判定
上 陸 艇 の 動き 決定
上 陸 さ れ だ が 判断
上 陸 艇 の 表示
弾 の 秘 動 ルー チン へ
パル カン 但 の チカ
ウ ク ラ ッ ルー ガン
パル カン 念 発射
チカ ラグ ラフ に 対し
て の 人 砲 弾 移動 距離 決
定
弾 の 秘 動 と 命中 判断
上 陸 用 に あ だ つ だ 負
理
中 お よび ハズ レ 時
の 着弾 処理
ナー ュー リル 0 理
画面 作り
弾 追 デー タ
ポイ ント
うち は 、 敵 に 砲 弾 を
難し い 。 距離 が 遠 け
高い と いう の も いい
と 思 つ 。460 行 の ら =S+10 を S
三 G 二 (| 一 192) キネ ど ) と すれ
ば いい 。 あ
と 、60 行 の =SG
NNT(RIND(4 )* ら 5)-1 )*4 の
5 の 値 を 大 きぐ する と 、 上 陸 艇 の
ほ つ が 強く
い ガ 適当 )
な る 。 (3.5 ン ノ ぐ こら
支 バ ッ チ リ 沿 。
クラ ンス トン マナ ー 心 スタ ー ク ラフ ト (会 03-988-2988)PC-8801, mk II・FM- 7 や デ ィ ス ク \ 12.800 欠 フ ラ ンス トン 卿 が う 4
ーッ た / 自分 の 屋敷 に 残し た 16 の 財宝 を 見 つけ 出す アド ベン チャ ー。 アッ プル カ ら の 秘 植 版 だ が こり わけ 評価 が 高い 。
湊 /009- の つづ @ の
oc 靖 呈
WWWW
WWWWW
UM
WW
力 。 10 個 の 基本 動詞 は ファ ンク ショ ン
・ キ ー に 設定 され て いる 。
友 参 考 マイ クロ キャ ビン 「『 不 思 議 な
国 の アリ ス 』
ある ひ あな た は お その せ 衣 5 に ま よ っ て し まっ た
そこ ご て で" は ご あな て が "みか あっ た
この は 部 落と どこが に この あま " ゆ せ 起 導
あや コ っ そい る る と こう が ある 3 お "た" 」
あな た は た ちち あか" り その は "し ょ に むか つの て あっ た
に の
テキ スト タイ プ ブ の アド ベン チャ ー ゲ
= 人
ある 日 入り こん で し まっ た 謎 の 世界 。
キミ は 、 6001 の 画面 に 出 て くる メッ セ
ー ジ だ け を 頼り に この 謎 を 解き 、 も と
の 世界 へ も どろ うと る ま よ い 歩 く の だ 。
コマ ンド は 動詞 名 詞 を ひら が な で 入
ふ へ VTV ッ |
は さと 忌 渡 |
貴石 ユー
ト kJINHJ
コマ ンド は が うし また 8
ょ うし すめ nb を 9 ら が な で いる
(な トー エ S「! と と 人 ル
び 病 S((Sre し v さ は み は
し さ グ HO の の ー の で . 注 MS 措 叶 」
mm
と ーー
て 抱け いく ン み る / も と て る / みる は な お ン と きき は に な と
ペー
よ
で ご
デ
ーーーー… こと は は え ⑭ まそ を て で て" す ーー ニーーー
コイ ント テーー ツ 7 みる
5 叶 拉 REmm gw WW
4 まず ざ 、 「 み る 」 こ ご と か が ら は じ レ め よう 。
。VPVM 計 トーV 2 ざき は
Spuelsl S 009 009 VVM 4 みっ
さと 豆粒 員 バ コーHS ホ で は みせ)
さき Stw 記 澤 |
へ と 還 避 癌
画 交 数 リス ト ・ 一 チェッ フ ボ イン ト ・ まだ まだ 不 自然 な 部 分 が ある し : 打ち こむ と き に わか り に こぐ し
較 プ ロブ ラム の 説明 ・。 アド ベン チャ ー ゲ ー ム で 、 絵 ・ 最後 の 詰め も 甘い で すね 。 ・ て ほし い 。 壇 バッ チリ 賞 。
アド ベン チャ ヤー な の で 、 ひ み ・ が な い の は 残 意 だ が 、 な か な ガ ・ プロ プラム に つい て は 、 ア ド ・
5 「 ・ 楽し め る ゲー ム だ よ 。 だ だ し 、 ・ ベン チャ ー な の だ か ら 、 も っ と ・
REM ※※※※
REM ※※※ NAZO0
BY KAJA
CLS:CLEAR199:GOTO 1459
DIMN$ も (7 ) ,C も (12) ,B も (7) ,M(7 )
FORIT=1TO7: READN$ も ( { ) ,B も (T):NEXT
FORI=1TO12:READC$ も ( 1 ) :NEXT
DATA は な 。 い え 0) まえ 。 は ^~ け うつ 。 い え 0 な か 。 は く 。 も り 。 え た ~ 。 も り の 0 の な か 。 く だ ~ も 0) 。 も り 。 ね とこ 。 い え 0) な か 。 ま っ ち
DATA へ や の な か , み る , と る 。 はなす, うこ ~ か す 。 いく 。 も と ~ る 。 た だ か う 。 さけ ふ ~ 。 お る 。 か ける 。 わた す 。 つけ る
ME も =CHR$ も (&HF9 )+CHR$ も ( &H9D )+CHR$ も ( &HDE )
FORI=1TO7:KEYI,C も (1)+" "ENEXTEB=1:BO=1:KEY8 "あけ る "EKEY9 "も ち も の
REM xxXX Main
PRINT 。 の は "BS も SCB) " て ^ す
CM$ も =" "ETINPUT " コマ ント ~-- "5 CM も : IFCM も =" "THEN1 60
A=1:11$=" "2T2 も =""
IFMID も (CM も ,A,1)=" "THENA=A-1:GOTO 209
IFA く >LEN(CM$) THENA=A+ 1 :GOTO189
LO0=9:T1$=LEFT も (CM も ,A) :12$=MID も (CM も ,A+T2):TFI2$=" "THENLO= 1
AA=1
の と /7 三 77
229 IFI1$=C$(AA)THEN369
239 AA=AA+1:IFAA く 13THEN229
249 IFI1$=" あ ける "THEN279
259 IFI1$=" も ち 5 もの "THEN329
269 PRINTCHR も (7 ) 。」" 。。 + ュ + テキ マセ ン ユキ キキ "EGOTO 159
279 IFB く >20RI2$ く >" と こ ぁ "THEN399
289 IFKA=9THENPRINT " x か まき ^ か ^ が かかっ て いる "EGOTO 159
299 DO=1:GOTO889 TITIIII
399 PRINT" x ぁ ま きま せん !!":GOTO159 HHTTH
319 REM xxx も ち も 0 TTTL
329 PRINT" "::IF ME=1 THEN PRINT ME$:" と ": TLHTT
339 Al=9:FORI=2TO07:IFM(T)=1THENPRINTN$(T):" と "ij:A1=1 年
349 NEXT:IFA1=1THENPRINTCHR$(29 )CHR$ も (29)" ま まっ て ます " :GOTO159 HH
359 GOTO549 TTTTTI
369 ONAAGOT0379,799 ,899,969,1119,1169,1299,1239*? 1329,1349,1399 ,1429 + け ナー
379 REM xxx Look THTT
389 IFL0=9THEN559 學
399 ONBGOTO 499,419,449,459,479,489,529
499 PRINT" x は な か ^ あり ます "EGOTO 159 U
419 PRINT" "ii:IFBA=9THENPRINT" は *9 う ": 〔)
429 IFB9=9THENPRINT" は = ": s
439 PRINT " ト ~ ア か *~ あぁ あります":GOTO 159 )
449 PRINT " xX きま か ~ た < さん あり ます ":GOTO 159 ea |
459 IFFR=9THENPRINT " x ふ ^ っ そう な か お まし た お と こ か ^ (ます ":GOTO 159 〇
469 GOTO 549 Ne
479 PRINT" 。 に の トラ モ ノ が か と いる "EGOTO 158 洋
489 IFCA=9THENPRINT" 。 x ね < こ か 0 る "
499 IFMC=9THENPRINT" x マッ チ か ^ ぁ る "
599 IFCA=9ORMC=9THEN159
519 GOTO 549
529 IFBA=1THENPRINT" 。 x まっ <5 た ^・・・ "EGOTO 159
539 PRINT " x > の へ や は き て ^ て ^ き て いる 3。 "EGOTO 159
549 PRINT " ぁ に も あり ませ ん ":GOTO 159
559 REM
569 ONBGOTO 579,599,619,459,.649,669,529
579 IFI2$=N$(1)THENPRINT" 。 * ふき みた に ・・・":GOTO 159 問
589 GOTO 688 っ ば や
599 IFI2$=N$(2)0RI2$=N$(3)0RI2$= "と ^ ぁ "THEN699 く ひ スー、 は
699 GOTO 689
619 IFI2$=" き "THENPRINT" ※ えな た か" た くさ ん ある き に くだ ^ も 0 か ひな っ て ます" :GOTO159
629 IFI2$=N$(4)ORI2$=N$(5)THEN699
639 GOTO 689
649 IFI2$= "は" け もの "THENPRINT" 。 * コワ イ ":GOTO159
659 GOTO 688
669 IFI2$=N$(6)0RI2$=N$(7)THEN699
679 GOTO 689
689 PRINT" x そん な 0 みあ た り ませ ん か こ ・・・" EGOTO 159
699 PRINT" x =~<》 う 50 "1 12 "て * す 。 "EGOTO 156
799 REM ※※XX Take
719 ONBGOT0729,749,779,819,819,829,859
729 IFI2$=N$(1)THENPRINT" ++ あな た は と こく は ^ お を さわ っ て し まい ": :GOTO879
739 GOTO 689
749 IFI2$=N$(2)THENBA=1:M(2)=1:GOTO 889
759 IFI2$=N$(3)THENM( 3 ) =1 :GOT0886
769 GOTO 689
779 IFI2$=N$(4)THEN869
789 IFI2$=N$(5)THENKU=1 :M(5)=1:GOTO889
799 GOTO 689
899 IFE1=1THENB0=9:M(4)=1:GOTO889
819 PRINT" % と れ ま せん !1 "EGOTO159
829 IFI2$=N$(6)THENPRINT" *% に け ^ ひ て し まっ た ":CA=1:GOTO 159
839 IFI2$=N$(7)THENMC=1:M(7)=1:GOTO889
849 GOTO 689
859 IFI2$=N$(4)ANDB0=9ANDBA=9THENPRINT" * へ や に 0 か ^ っ 0 を ・・" EGOTO1538
869 GOT0689
879 PRINT" し ん て ^ し まい まし た ++ キ "5 EGOTO1699 奈 交 り
889 PRINT" 0O.K":GOTO 156 く ペ ス
899 REM xxx Talk Ll
999 IFB<40RB>6THENPRINT" x たもと ・・":GOTO 159
919 IFB=4THENPRINT" 『 タ ・ タ へ ~ モ ノラ ヲ ワケ テ クレ 』":GOTO 159 O 〇
ゲー ミン プリ ー ズ 心 アス キー ( 合 03-486-7111) PC-8801, mk II つ 5 イン チ デ ィ ス ク \4.800 欠 新 し い ツ イプ の パズル ゲー ム 。 台 パ ヒル
アッ 。 ッ ん /ー ト に 1 個 ある 間違い を 探し め て 、 ア メリ カン ギヤ ルズ を 復元 する 。 プ ラフ ィ ッ が 美しい 。
FNIN ロ NIdR 光 くう
の
ふ 民 洪 光 へ ヽ 対 ロロ AS は へ ざこ eel9tl9t し 宙 d の 理 一 SH
"へ イ 」
NAZO リ スト 続き
3 タタ
929
939
949
959
969
979
989
999
1999
1919
1929
1939
1949
19S59
1960
1979
1989
1990
1100
1119
1129
1139
IFB=5THENPRI NT " 「 オ マエ ブ タ ヘ へ ~ テ ヤル ソ "」 と いっ て あ # を た は を た へ られ て し まい まし た" :END
PRINT " 「 ね こさ ん この ふし き ~ な せ か いか ら ぬけ た ~ す ほう ほう を お し えて くだ ~ さ い 。』
PRINT" 「 そん な こと お し え を たこ ニヤ う わた し は ころ さて ・・・
PR TI NT " ちか ~ うこ と お し えた け ~ る よ な そ ~ を あや つっ て いる 0 は この 0 いえ ニャ 0 を ~ 」":CA=1:GOTO159
REM XX※※ MOVe
IFB=1THEN720
IFB=6ANDN$( 6 ) = I 2$THEN820
BB=1:IFB=2ANDI2$=N$(3)ANDO0= 9THEN1039
IF IT 2 も =N$ も (BB )THENPRINT" ※ へ いつ に か わっ た こと は お こり ませ ん 。":GOTO 159
BB=BB+ 1 :IFBB=8THENPRINT" ※ うこ きま せん ":GOTO 159
GOTO 1999
00= 1 : PR I NT " 「 ア ー ア ヨク ネタ ナー オ コ シ テク レタ オレ イニ ナニ カ ア ケ ~ ゴ ヨウ 」 と こけ ひけ ^ と か ~ いっ て る
INPUT " 「 ナ ニカ トー イイ 」" 5H$:PRITNT
IFME$ も =H$ も ANDBA=1THENME=1:PRINT "0O.K! 1 と いっ て "53:GOTO 1199
IFME$=H$STHENPRINT "いれ も ん か な いか ら ご ほ ^ れ を 1019:GOTO 159
IFH$ も = "か きま ^ "THENKA=1:PRINT" 『P OK 1!」 "EGOTO159
CB=CB+1:IFCB く 5THENPRINT" 。 『 ソ ン ナ モノ アリ マセ ン !」 "EGOTO 1949
PRINT" 有人 ・/AN 用 と こま か し な か すら "5
PRINT " ペン # な 0 ひと は いっ て し まっ た "EGOTO 159
REM XX※X GO
IFB=10RB=30RB=4THENB=B+1:PRINT" 。 ※ いと “とう し ます "EGOTO 159
IFB=5THEN1 1 89
IFB く >20RDO く >1THENPRINT "これ いし * ょ
PRINT " 「 う ぁ あ あぁ ぁ ぁ ・・ 」 あな を は ト ~ ア 0 の も むこ
REM ※※※ BaCK
IFB=20RB= 4THENB=B-1:PRINT" ※ も と と り ま す " EGOTO 159
IFB=5THENPRINT" ++ 八 ~ サ モノ に ころ され "5 EGOTO 879
いけ ませ - ん ":GOTO 159
9
う 0 む 0 せ か い に お ち 5 て "5EGOTO879
PRINT " % こい し て ょ う も と ^ れ ませ -ー ん "5 GOTO 159
REM ※※※
IFB=40RB=5THENPRINT" ※ まけ を ・・・" EGOTO1609
PRINT "あお と と ・・・ "EGOTO159
REM ※※※ etC
IFB=5ANDFR= 1THENPRINT "・・・・ あっ さっ き の 0 お と こ か "て て き て "サモ ノ ま 。 "5:GOTO 1299
IFB く >6THENPRINT" %※ 0 と り て * さわ いで でろ る 117 EGOTO 159
IFBN く >1THENPRINT" 「 う る せい 11」 と いう こえ か " する "KBN=1:GOTO159
PRIENT " 「 も うと 0 ヤー だ た) あと で も まう し 7 や る 」』 と り っ 3 で まっ うく ぐ 9 な が の Y に "1
PRINT" と し "こめ うら て し まっ た "・B=7:GOTO 159
PRTINT "ころ し て く < を そ ^11 リ EPRINT" 。 その 0 こ " お と こ は いっ て し まっ を "KGOSUB1520
PRINT" し は らく ある いて いる と いえ か ^ あっ た 0 て ~ は いっ て みな た" 。。" 。 する と と いあ か 、 "
PRINT" と し "て し まっ て と し "こめ られ て し っ た 。" 。。:B=6:GOTO 159
IF B=3ANDI2$=N$( 4 )THENE1=1:GOTO 889
GOTO 249
IFB= 1ANDI2$=ME$ANDME= 1THEN1369
GOTO 249
FORI=15TO89STEP2:PLAY"n=Ii64":NEXT
PRINT" ※% と うつ せ ~ ん まり わり か ^ し ろく な っ て まき か * つ < と "B も (4)" に いた ":B=3:M(2)=9:M(3)=9
ME=9 : GOTO159
IFB=4ANDI2$=N$ も (5)THEN1419
GOTO 249
PRINT" 「 サン キラ ュー」 と いっ て さっ て いっ た ":FR=1:M(5)=9:GOTO 159
IFB=7ANDI 2$=N$ も (7 )ANDMC=1THENBA=9:PRINT" 。 ※ 0 ひか" うつ 0 を "GOTO 150
GOTO 249
REM ※※※
PRINT 「" ある 0 あな な は な そ ~0 せ か い に ま よ っ て し まっ た ":PRINT
PRINT " そこ て ~ は こん な て ル ^ み か ~ あっ た "。" 『 こ 0) せ か 0OO と ^ こ か に と の な そ "0 せ か い を ヴ
PRTINT あや つっ て いる 3 と と ころ か " あぁ 3 は すず" あっ"
PR INT " あな た は た ちあ か " り その は “し ょ に むか う 0 て ^ あ っ た "。。。
PRINT" コマ ント ~ は と "うし まし は “の と こつ し + す めい も ま 0S5 が "な て で" いれ る
PRTNT 。 。 (れい 0) いく / み か る / も と “る / みる は な / と る は < な と“
GOTO 79
FORI=1TO2999:NEXT : RETURN
PRTNT ,。" や YE 0 か "うう 9 り か し "に な うっ て し まっ た 「 、「 あな だ た は きとう し な い た お れ て し まっ だ た ・*・
GOSUB1529: GOSUB15209
PRINT , 。 。。" きか "つく と ニー・・・ の 。。 リ あな た は し に ふん の 0 つや て ~、 た お れれ て いた " 。
PR INT " や は り あの いえ か ^ な そ ^ を あや うっ て いあ の た ~ "GOSUB1529
PLAY "oceed.dfedcc","o5ceed.de8f8fdcc" ,"V6o5ccco6d . def eCC
PLAY'"eed.dfedcc", "eed.de8f8fdCc" , "Ccg.9V8aabg9
GOSUB1529 : GOSUB1520
RESTORE 1619:FORI=1TO19:READ A$:KEYI .A$:NEXT
DATAcolor ,cload,goto,11iSt,run,SCTeen,CSaVve,pPTint,pl1ay,COnt
WWWW
靖 UM
分 秒 の 順 で ~ で 区 切っ て 入
力 す る こと 。 最後 に は 必ず リ
eee プチ ター ム 導
アラ ー ム 音 を 止め る に は 大 文
/e 2 ヽ 4 ッ ト し な お す に は 大 文字 の A。
遊び 方
マコ ニー な 置き 時 計 に な る ね 。
の と だ ZIA7
の と /7 了 アア
は っ きり いっ て 、 こ れ は 時 計 で す 。 字 の E (押し 続け る ) だ よ 。
で も 、 ち ゃ ん と 日 付け ・ ア ラー ムッ 機 能
休 き なん て すず 邊 。
デア ラーム ツモ ツタ ド も タイ ム バ や セッ トド
5 同じ や り 方 で 、 日 付 は 例え ば 84/09 200DOUEU2539SHUEINPT け PTNIPSZWTIRZ952 TEL03REGE ID の 5
グ 23 の 証 う に へ 桁 の 数 字 を 年 月 日 の 順 0CATE 25.9:LINEINPUT" ナ ン 年 ナン 月 ナン 日 " ,Z$:DATE$=Z$:D$=DATE も ELSE 26
39 LOCATE 24,9:LINEINPUT "ナン 人 財 ナン 分 ナン 称
に に ブ "て 区 切っ て 入力 。 時間 は 13 :05 D$:LOCATE 79,4:PRINT T2$
49 LOCATE 2,9:LINEINPUT" キ 9 年 > 月 日
還 エク マッ pm て 4 い ー デ - す ン
・29( 午 後 1 時 5 分 29 秒 ) の よう に 、 時 59 LOCATE 28,9:LINEINPUT" イ マ 内 分 た 穫
26:DATE$=Z$
"2Z$:TIME$=Z$:COLOR=(2.1)
の $:TIME$=Z$:T2$=TIME$:LOCATE 79,2:PRINT
|
約
69 FOR A=4.71238898# TO 19.99557429# STEP.194719755#:B=B+1:E(B)=C0S(A)x198+32B:F
(B)=SIN(A)x85.485+169:M(B)=COS(A)x14+328:N(B)=SIN(A)x62.93+199:LINE(328.109)-(C
0S(A)*219+329,SIN(A)x94.395+19 ) ,PSET, 7 :NEXT
7 CIRCLE(326,169 ) ,26,2:PAINT(329,199) ,2,2:FOR A=4.71238898# TO 19.99557429# ST
EP.523598775#:X=COS(A)x219+320:Y=SIN(A)x94.395+199 :LINE(329、109)-(X。Y) 。PSET。7:NE
XT:CIRCLE(329,199 ) ,194,1:PAINT(329,199) ,1,1:LOCATE 62,23:PRINT "Technopolis !"
86 COLOR 6:・
99 HH=VAL(LEFT$(TIME$,2) ) :MM=VAL(MID$(TIME$,4,2) ) :SS=VAL(RIGHT$(TIME$。2) ) :T=TIME
:HH=HHx5:IF HH>=69 THEN HH=HH-69
199 H1=MM/12:HH=FIX(HH+H1 ) :CONNECT(320,199 )-(E(SS) ,F(SS) ) ,7 PSET:CONNECT(328.19
)-(E(MM) ,F(MM) ) ,5,PSET :CONNECT(320 ,199 )- (M(HH) ,N(HH) ) ,3,PSET:LOCATE 36。18:PRINT
TIME$:LOCATE 36,16:PRINT DATE$:PLAY"S8M39L5N=PLiT20"
119 IF TIME<>T THEN CONNECT(329 ,199 )-(E(SS) ,F(SS) ) , ,PRESET :CONNECT(E(MM) 。F(MM) )-
(329,199 )- (M(HH) ,N(HH) ) , ,PRESET :GOTO 99 ELSE IF TIME$=T2$ AND DATE$=D$ THEN PL=7
5:LINE(599,19 )-(635,49) ,PSET ,1,BF:GOTO 129 ELSE 129
120 IF INKEY$="A" THEN LOCATE 79.2:LINEINPUT"",D$:LOCATE 7、4:LINEINPUT"" 。T2$:GO
| 注 MI は さる nS こ Ar 4A と 4
| 趣 半 4 さき ッ ン r JHHHo 放 前 ゆき
し どり で 避 町 器 弄 洲 瀬 沈 元弘 |
歴
書
紀 |
は
る
も
の)
1
枚
な
の
で
す
だ だ:
ん
| さ 落 とる 。 一 叶い は 旨 - ボ で
一変 数 リス ト ・「…… 現 在 の 時 間 ・ 70 ら 分 刻み の 目盛 を 描 ・ 玉 チ エ ツ フ ポイ ント
E( )F( )…… 長 針 , 秒針 の X,Y ・ 日 1…… 短 針 の 補正 こく ・ パッ フ が 青 で 見 づら い 人 は ,
座標 ・ PL……PLAY の ON.OFF : 80 カラ ー 設 定 と REM ・ 10 行 COLORZ, 1 を 7.0 に 、
M( )N( )…… 短 針 の X, Y 座 標 ・ 軒 プ ロブ プラ ム の 説明 ・ 90 現在 の 時 間 ・ 50 行 COLOR=( ら , 1 ) を (2.0)
BB…- 配 列 の 滅 字 ・ 10 初期 設定 ・ 100 針 を 描く ・ に 70 行 CIRCLE(320.100).194.1
Z$…… 入 力 用 ・ 20 アラ ー ム の 有無 ” : 110 1 秒 経過 判断 , 針 を ・ を ,.194.0 に PAINT(320.100).1,
D$S…… ア ラー ム の 日 付け ・ 30 アラ ー ム の 入力 ・ 消す ・ 1 を ,0.0 に 110 行 LINE(500.10)
T2$…… ア ラー ム の 時 間 ・ 40 日 付 の 入力 ・120 アラ ー ム の 時 間 、 入 ・ (635.40),PSET. 1 .BF を ,PS
HH-…… 現 在 の 時 00 時 間 の 入力 ・ カカ , アラ ー ム スト ッ ツ : ET.0,.BF に すれ ば バッ フク が 黒
MM-…… 現 在 の 分 ・ 60 目盛 を 描き , 針 の 座 ・ 4 ・ に な つて 見 や すぐ な り ま す 。
SS…… 現 在 の 秒 ・ 標 を 配列 に し まう ・ 130 エラ ー 娘 理 ・ 放 ヨ ッ シ ャ 賞 。
TO 119 ELSE IF INKEY$="E" THEN PL=9:GOTO 119 ELSE 116
139 LOCATE37 ,9:LINEINPUT"".Z$:RESUME
レル /
WW
UM
る 、
(5 遊び 方
迷路 と いう より も 制限 時 間 内 に な る
べく だ くる ん の 数 字 を と っ て いく ゲー
ム 。 キ ミ が 操作 する 数 字 は *5?。 1 一
4、6 一 9 の 数 字 を この "5 "て 消し て
いく の だ けれ と ど 、 画 面 の 数 字 と テン キ
ー と 数 字 の 位置 が 一 致す る と きだ け 取
の さと が で きる の だ が 、 だ と え ほ 、 “97
の 右 縦 め ゅ 上 に 9 が 表示 され て いれ ば テ
ン キ ー の [9] を 押し て 、 こ の 9 を 取る こ
$ う 全
9
+ー 葵 Yu マー で |
り 吾 VH て ここ oe のり 9
ピン
Jolw ど AJ 引 と
本
:
史
が か が
好
き
な
た の
こく て
ミド
度
は
歴
呈
ン
ュ
下 。 ト ー エ ビー よび OLS の |
EID iit す きら する TI)
と が で
ー ノ バー(【
で 取っ た 数 字 が メロ ディ に 変
換 さ れ て 流れ 、 そ れ ま で の 動
き が 再現 され る 。 得点 は 数 字
の 合計 だ 。 画 面 は 4 通り ある
の で 好き な も の か ら 遊 ぼう 。
きる の だ 。
制限 時 間 は 5 分 。、 タ イム オ
マ ま ん な か あ だ り の 5/ が ガキ
三 。 な ん が 目 が ガチ カチ カ ……
5 が の と 、 キ ざ が 今 き
80)CO ふ て ょ
る び yONA も YOCO も SCOD0O も うか) あい ひか へ に さち いい
WIDTH49 ,25:RANDOMIZETIME:PLAY "T209V1405L8":DIM MM(999 ) ,MX(2099 ) ,MY( 20 )
FOR T=1T09:READ M$(T):NEXT:DATA A,B,C,D, ,E,F,G,。A 提
COLOR7, 1:CLS:SYMBOL(59 ,50 ) , "サン ルー メイ ロ " 7.7 9:SYMBOL(51,52) "サン NT ーー メイ ロリ" 7,7,6
PLAY "CDCDABC":LOCATE12,29:INPUT" が ル ん NO AA 1.2.3,4 "PEIF P>4 OR P=9 THEN49
COLOR7 ,9:CLS:SC=9:X=19:Y=12:J=9:JJ=9:LOCATE9,3:FOR T=9TO799
R=INT(RNDx9+49):IF R=53 THEN69 ELSE PRINT STRING$(1,R)i:NEXT
LINE(9,1)-(39,24)," 還 ",1.B:LINE(1.2)-(38.23)。" "BEON P GOTO89,99,199,110
FOR T=8TO16STEP4:LOCATE3,T:PRINTSPACE$(34) :NEXT EGOTO129
LINE(8.5)-(31.29)。" "BELINE(19.5)-(19,29)," "EGOTO129
LINE(4,12)-(35。12)。" "LINE(4.5)-(35.19)」" "LINE(35.5)-(4.19) "GOTO120
COLOR1:FOR T=2T023:LOCATE18.T:PRINT" 軒 の NEXTELINE(6,12)-(33.12) 7
COLOR7 :LOCATE26 ,9:PRINT "HI-SCORE":LOCATE15,9:PRINT "SCORE"
LOCATE9,9:PRINT "TIME" :TIME$= "99:99:99":COLOR4:LOCATE34 ,9:PRINT HS:BEEP
XX=X:YY=Y:LOCATE6,9:PRINT TIME$:LOCATE29 9:PRINT SC:LOCATEX,Y:PRINT"S"
IF TIME$>"99:95:99" THEN219 ELSE B$=1NKEY$:B=VAL(B$):IF B=9 OR B=5 THEN149
IF B<4 THEN YY=YY+]1 ELSE IF B>6 THEN YY=YY-1
IF B=1 OR B=4 OR B=7 THEN XX=XX-1 ELSE IF B=3 OR B=6 OR B=9 THEN XX=XX+1
A=SCREEN(XX,YY):IF A=B+48 THEN199 ELSE IF A=32 THEN299 ELSE149
PLAY M$(B) :SC=SC+B: JJ=JJ+ 1 :MM(JJ) =B
LOCATEX,Y:PRINT" "EX=XX:Y=YY:MX(J)=X:MY(J)=Y:J=J+1:GOTO149
IF SC>HS THEN HS=SC:LOCATE34.9:PRINT HS:FOR T=9T0299:BEEP1:BEEP9:NEXT
FOR K=9TO0JJ:PLAY M$(MM(K) ) :NEXT:FOR K=9TOJ-1:LOCATE MX(K) ,MY(K) :COLOR2
PRINT"5":FOR T=9TO199:NEXT:LOCATEMX(K) ,MY(K) :COLOR4:PRINT" 還 "NEXT
LINE(9,8)-(649,299 ) ,PSET, 1.BF:COLOR7 :LOCATE19,12:PRINT "モウ イト ~ ヤリ マス カー Y/N"
A$=INKEY$: IF A$="Y" THEN39 ELSE IF A$="N" THEN END ELSE259
画 変 数 リス ト ・ AS.B$S…… キ ー 入 力 ・ 50-60 初期 値 お よび 乱数 発 ・ 190 MP pl 4 pp
MM( )…… メ ロディ 記憶 用 。 ・ B…… 入 力 数 字 生 ・ 200 座標 記憶
MX( )MY( )…… 移 動 X・Y 座 ・ XX.YY…… 移 動 座標 ワー フ ・ 70 パタ ダーン 番号 より 各 ・ 210 ハイ スコ ア
標記 憶 用 ・ A…… キ ャ ラフ タコ ー ド 行 へ ・ 220-230 プレ イ 再現
MS$( )…… 音 階 読み 込み ・ 田 プロ ブラ ム の 説明 ・ 80-130 画面 作成 ・ 240-250 リプ レイ orEND
P…… 画 面 パタ ー ン No. ・ 10 初期 設定 ・140 タイ ム 等 表示 ・ 囲 チ エッ フ ボ ポイ ント
9665 ・ 20 音階 読み 込み ・150 タイ ム 判 断 , キー 入 ・ アイ デア は いい で すね 。 面 の
HS…… ハ イス コア 2 .80 タイ トル カ ・ パタ ー ン は 80-110 行 。 自分 で
XY…… 秘 動 座標 ・ 40 画面 パタ ー ン 番号 入 ・ 160-170 座標 物 動 ・ パタ ー ン を 作る の も いい ね 。
り .JJ…… 移 動 回 数 と ・180 数 字 一 致 判断 ・ 廊 バッ チリ 賞 。
レイ ン
の だ ルル 7
フリ コメ / コ
WW
WWWW 回 還 回 部
マ 力 強い ツイ トル を 上 空 に 見 THTTTL
な が ら 、 ス ペー ド は 果て し な TLTTTTL
き 大 地 を 跳ん で いく の だ つ だ 。 LTTLTI
エネ ルギー が 0 に な っ た
り 、 有 石 に ぶつ か っ て し まっ
だ りす る と ゲー ム オ ー バ ー。
い ぶ 進ん だ 距離 が スコ ア に な る 。
衝 び 方 と きど き 、 エ ネル ギー カ
RUN す る と 、 い き な り は じ め る の で プ セ ル ( 夫 ) が 落ち て いる の
十分 心 の 用 意 を し て か ら 始 め よ う 。 で 。、 ご は ジャ ジジ せ ず に
全 が キミ 、 欠 が 石 で 、 キ ミ は [21 キ ー 。 ひろ うこ と 。 エ ネル ギー が
を タイ ミン グ よ く 押 し て 、 こ の 石 を ジ 15 増 える ぞ 。
ャ ング し て いく 〈 く の だ 。 [GRAPH | キー を リプ レイ は 、
押し な が ら [2] を 押す と 、 ふ つう より 高 。 キー を 押 そ う 。
〈 ジャ ング で きる の で 、 石 が 固まっ て
きだ と きど と に 利 用 し よう 。 だ た だ し 、
エネ ルギー は 、 ふ つう ジャ ンプ する た 1 '[[[ JUMP : FOR FM-7 : イル ラン ト ^ 198 : 1984 ほ 8 月 28H : 88x25 1 か 必 アロ グラ ムコ ]]
3 導 AE RS 2 MIDTH 49.25:CONSOLE 9.25.9.8:RANDOMIZE TIME:DEFINT A-Z:SCREEN 7.7:FOR I=1 TO
- 2 減り 、 大 ジャ ンプ で は 5 減る ぞ 。 5:COLOR=(1.4) :NEXT 1:COLOR=(7.4) :COLOR=(6.8) :COLOR 7.9:CLS:PLAY"L6405":Y=18:E=26
:DIM TX(8):FOR I=1 TO 8:TX(I)=18+Ix3:NEXT 1:SYMBOL(9.9) "JUMP!"。10.8.6
36 LINE(9.152)-(639.199) 、PSET.6.BF:LINE(358.152)-(458.199) 。PSET。7:LINE(28。152)-
(186.199) .PSET .7:LINE(209.152)-(9.199) .PSET、7:LINE(439,152)-(639。199) 。PSET。7
49 FOR !=1 TO 5:READ X:PAINT(X、152).1.9.7:NEXT IEDATA 9.210.315.429。639:COLOR 7
59 FOR I=5 TO 1 STEP -1:COLOR=(I.1):LOCATE 18.Y:PRINT" ":IF Y く 18 THEN Y=Yt1:E=E-
1:PLAY"ED" ELSE COLOR=(6.8)
69 A$=INKEY$:IF A$="" OR Y<>18 THEN 7 ELSE COLOR=(6.6):IF A$="2" THEN Y=16 ELSE
IF A$="+" THEN Y=13
79 LOCATE 25,.2:PRINT USING"ENERGY 提 "1E:LOCATE 18、Y:PRINT"$":SC=SC+1:LOCATE 25
・4:PRINT USING" SCORE 提 拉 仁 " SC
89 FOR J=1 TO 8:LOCATE TX(J),18:PRINT" ":NEXT J:FOR J=1 TO 8:TX(J)=TX(J)-1:IF TX
(J) く 9 THEN TX(J) =RND( 1 )*5+35
いな て WS は 団 |
39 LOCATE TX(J) 18:PRINT"@":NEXT J:LOCATE TX(8)、18:PRINT"@":S=SCREEN( 18.Y)
199 IF S=ASC("@" ) THEN E=9 ELSE IF S=ASC("@") THEN PLAY"CDEFGAB" :E=E+15:LOCATE 1
9.16:PRINT"ENERGY = ENERGY + 15":LOCATE 19.16:PRINT" E
110 IF E<1 THEN FOR !=1 TO 19:PLAY"BAGFEDC" :NEXT I:LOCATE 18.18:PRINT"X":LOCATE
15.19:PRINT"GAME OVER":COLOR=(6,6):LINE(9.152)-(639、199) ,.PSET,7.BF:LOCATE 12,12:
INPUT"PUSH RETURN KEY ":A$:RUN ELSE COLOR=(I.4):NEXT I:GOTO 56
け
『 の )
| 人
| が
| 実
| カカ
| の
| あ
| る
| 人
壮 織 時
な
し
蘭 織 遂
で
す
は ロ き (( 。 半 表 水 雪 S て すき 4 な で さ つ |
| HerS で VH ここ 還 出 析 叶 |
_ 国 vd ミ ー ロ さ ハ ラー こす ロ 回 ご 性 S9* |
MtJ 秋 JJ の VH へ 9 ズ エ デ
_ Serv ささ H
ラフ マタ コー ド ・ 80~ 90 岩 と エネ ルギー カプ : を 設定 し て も いい か な 。
・ 較 プロ ブラ ム の 説明 セル 移動 、 プ レイ ヤ ・ エネ ルギー カプ セル を 取る こと 、
* 0 REM 文 ・ ー の 位置 の キヤ ラフ :* 毎回 15 ず つ エ ネル ギー が 増え る
TX( )……: 石 の X 座 標 ・ 20- 40 初期 設定 、 画 面 作成 タコ ー ド 読み 込み ・ が 、100 行 =E+15 を :F=INT
TX(8)…… エ ネル ギー カプ セル : 50 地面 処理 、 プ レイ ヤ ・100 キャ ヤラ ク 々 判断 ” :(RND(1)*11)+5: ビ = ヒ E+F に
の X 秦 標 ー 消 去 :110 エネ ルギー 切れ 判断 ・ 変 えて 、 次 の ENERGY 二 15 を
A$…… キ ー 入 力 用 ・ 60 キー 入力 と 処理 ・ 玉 チェッ フ ボイン ト "ENERGY す ?FFOR 日 =0
SC…… ス コア ・ 70 エネ ルギー と スコ ア : 80x25 字 モー ド で の 1 画面 で ・ TO 500:NEXT H こ すれ ば い
ら …… プ レイ ヤー の 位置 の キヤ ・ と プレ イヤ ー 表 示 :・ す が 、 ボ ー ナ スポ イン ト な ん ガ : いね 。 災 ヨッ シャ 賞 。
7
W
nM
信号 が 述 中 の 障害 物 に ひつ
が か が つ だ と だ ん 、 ピ ビ ピッ / DG6-
VIce |/ 〇 Errorl
*&” を あや つっ て 、 ポ
ツボ ポン ッ と 出 て (る 障害 物
の 真下 (まだ は 真 上 ) へ
遊び 方 行き 、 スペ ー ス ・ キ ー ぞ を
## ま を SHVE SR LURD7
押せ ば 取り 除け る 。
テー ブレ ュー ダ で SAVE や LOAD エラ ー を 5 回 し て し ま
を が 人 や っ て る キミ は 、 セ ン と くる ゲー ム 。 うと 、 ゲ ー ム オー バー。
画面 上 の コード は SAVE 用 、 下 の コ 信号 を 無事 通す と ボー ナ
ー ド は LOAD 用 。 それ ぞ れ の 中 心 を 通 ス 1000 点 。 リ プレ イ は 何
る 黄色 い 線 が 信号 線 だ 。 か キー を 2 度 押 そ う 。
この SAVE の 左端 か ら 、 右 端 へ 、L
OAD の 右端 か ら 、 左 端 へ 、 信 号 (*)
が 削る の で 、Device TO Error(!)
ミ H 泌 ゝ っ リー ニ CT 【 ュ
カ 出 ょ い さ に 障害 物 ( 倫 ) を 取り 除 【 19 REM HH SAVE 8 LOAD2 For_H47 By T.UCHIDA 1984/8/20 相 村 提 革 村 相 村 村
て ほし い の だ 11 COLOR 7.9:MIDTH 8、25:RANDOMIZE TIMEES=9:X=49:Y=10:M=:ILOCATE 9.6:RESTORE
OO
12 SYMBOL(59、15) "www SAVE & LOAD2 。 www"、3、2、5:LINE(9、159)-(639.199).PSET 4
13 A も ="ー"EB も = リー C も =A も ED も =B も :FOR LE9 TO 78:A$=A$ も StC も :B$=BStD も ENEXTEFOR LE9 10 11: ド
EAD CECOLOR CEPRINT "7 ASICOLOR 6:PRINT B も ECOLDR CEPRINI ASENEXTEDATA 2.7
COLOR 5:LOCATE 19.29:PRINT "HI-SCORE" SPC(20) "SCORE" SPC(29) "MISS"
FOR F=9 TO 2:FOR LE1 TO 79 STEP .5:COLOR 7
) LOCATE 15.22:PRINTUSING " 提 持 半 "HE1LOCATE 43.22:1F H<S THEN H=S:GOTO0 16
PRINTUSING "人 村 折 人 "15E 1 INT(RNDx89)=9 THEN LOCATE INT(RND*78)41.8:PRINT @ り
LOCATE 66.22:PRINT M:IF INT(RND*89)=9 THEN LOCATE INT(RND*78)41、13:PRINT 人
1$=INKEY$:1F 1$="4" AND 1<X THEN X=X-1 ELSE IF 1$="6" AND X<78 THEN X=X+1
IF 1$="8" AND Y=11 THEN LOCATE X.YEPRINT |) の YE10
IF 1$="5" AND Y=16 THEN LOCATE XYIPRINT SEY=11
COLOR 4:LOCATE X-1.Y:PRINT "8 "COLOR 6:」F I$2 く CHR も (32 ) THEN 24
IF Ys19 THEN LOCATE XY-2:PRINT "-" ELSE LOCATE XY+2:PRINT ーー
IF F=1 THEN IF SCREEN(L.8)=236 THEN S=S-599:GOTO 27 ELSE BEEP 1:LOCATE L-1.8:
PRINT "-"ECOLOR 3:PRINT "ES=S+2:BEEP 9
25 IF F=2 THEN IF SCREEN(79-L,13)=236 THEN S=S-699:GOTO 27 ELSE BEEP 1:LOCATE 73
-L,13:COLOR 3:PRINT "w"EECOLOR 6:PRINT "- "5S=S+1:BEEP 9
26 NEXT:NEXT:S=S+1999:GOTO 15
27 BEEP 1:M=M+1:LOCATE L-1.8:COLOR 6:PRINT "--"ELOCATE 79-L、13:PRINT "ーー" ELOCATE
39 16:COLOR 2:PRINT "Device I/0 Error":FOR B=9 10 699:NEXT:LOCATE 39.16:PRINT S
PC(16) :BEEP 9:1F M>5 THEN BEEP 1:SYMBOL(59、59) 、"GAME OVER" 、4.3.3 ELSE 15
28 SYMBOL(390,99 ) , "SCORE "+STR$(S).3.2.5:1$=INPUT も (2):BEEP 9:GOTO 11
JASe ひ て 石 団 較 こき 壮 AvSt 1
1 て て は みせ りう 葵 コイ ーm Vi 年 当 癌 。HQ ぐ
は どり と 糸 く きよ d 圧 は JO カヨ 0 ン /| 9
-IA9H て SKK ざけ と 下記 薄 ③ 芋 潮 さ と
病 紐 ざき 必 ご テー ロ mm の 寺 ビ ドー キミ 9
rr 。 と は まぐ で すみ の ひき 相 画 弟 装 い
男 変 数 リス ト ・ プ ロブ ラム の 説明 定 ・ 白 が あか な こく て す む お 。 あ と 、27
S…… ス コア ・10 REM 文 ・ 27- 28 MISS 処 理 と GAM : 行 の 最初 の BEEP1 の 1 を 取り
H…… ハ イス コア 9 人 初期 設定 E OVER ・ FORB=0 「O600 を TO 20
XY………&" の 座標 : 12- 14 画面 作成 ・ 田 チェ ッ フ ボイン ト ・ 00< ら い に し て 、BEEP 0 を 取
M……MISS 数 ・ 15- 26 メイ ン ル ー チ ン : 障害 物 を 排除 し て も 得点 が 入 : る と 、 エ ラー が 見 や すぐ な る 。
AS.BS,CS,DS…… 画面 作成 : 16-18 スコ ア な どの 表示 と : る よう に し た ら ど うか な 。23 行 : 災 ヨ ッ シ ャ 党 。
用 5 衝突 判定 ・ の ELSE の 前 と 最後 に :G=S+ ・
LF.B…… ル ー プ 用 ・ 19-23 キー 入力 と 判定 処理 ・10 を 入れ まし ょ う 。 PRINT の :
| 軸 …… キ ー 入 力 用 ・ 24^25 ^*" の 表示 と 衝突 判 ・ 後 の スペ ー ス を 取れ ば 、1 行 空 ・
し ん 】
WWWW
遊び 方
基本 的 に は スネ ー ク ゲー ム な の だ け
れ ど 、 プ ラス o の 有 要素 で リア ル タ イ ム 思
考 が ゲー ム に な っ て る と ころ が いい 。
I214I618| キ ー で スネ ポー ク を 操作 し て 、
画面 に 現れ て いる アル ファ ベッ ト を 全
部 取れ ば 1 面 ク リア 。
た だ し 、 地 雷 (X) を 踏ん どり 、 エ ネ
ルギー が 0 に な る と ゲー ム オ ー バ ー が ど )
エネ ルギー は 最初 0 で は じ ま り 、 画
リリ 3「 バ ー
まる まま すす ミ る まま すす を を する も ます まま を た る を を る ネネ ミネ ネネ]
婦 < ょ ・ 分 ステ
た HE す RT KEY]
まま すま も オミ キミ オミ すす すす すす ネ ミ すま すす すす すす すす ミ す )
き
%
」
1
#
ト 」
に
は
き
玉
欠
まあ
3
当
ま
1
央
】
ま
に
5 電 し 2 PDERT
*
】
4
拉
ユ
疲 て と は 二 圭 束 ト ー エ ざさ っ
_ NNIN と さき 0W 合 守 /K さ させ せり 浴 WS
> ッッ > せ SWCAO 沿
で -
〆
NN させ JO の 生み 培 寺 寺 に NN
JammmNSm 各 き 避 SFMN ロ NL
し ささ ン ン な S は で 融 N コ トーNV2
( ロ NIS 肖 ゆ 、、
ww
面 の ほとん ど を し め る ドッ ト を 取る ご
所 おす つ 0 疹 えて いく 。 そし 自分 の
通っ だ あと を 通る と 、 1 マス 重なる ご
と に 50 ず つ 減 っ て いく の だ 。 だ か ら 最
初 の うち に いき な り 自 分 の 体 に ぶち あ
だ た る と だ ち ま ち エ ネル ギー が 0 に な っ
し ゲー ム オ ポー バー。 な る で く 同 じ 追 を
2 度 と 通ら な いよ うに 考え て 進ま な く
ちゃ いけ な いわ けが だ 。
画面 右上 に 英 単 語 が 表示
され て いて 、 こ の つづ り の
順に ひろ っ て いく と 、 ボ ー
ナス な ん と 500 点 。 こ れ が 結
構 難 し いん だ よわ 。
ボー ナス は 他 に も ある 。
rprcrrcccrrpCEEHHEER EE
素
素
EEE
ea 2 を る の あか ゃ と る 3 は
も
は 10 点 の ボー ナス 、 珍 は ミス テリ ー
ボー ナス 。
ルー ル の や きき し いと ころ は 、 壁 に ぶ
つか っ て 6 ゲー ムキ オー バー に な ら ず
だ だ 止ま を る だ け と いう 点 。 ち ょ っ と 上 区
じ ぶ が つた だら 、 幸 に つっ こん て し ば 6
〈 コース を 考え る の も いい か も わ ね 。 画
面 パ タン は 5 面 ま で ある よ 。
文 参考 「 プ ログ ラム ・ ポ シェ ッ ト 」V
o1.2、『Zeppi」
第 1 面 、 す ば や ぐ 判 断 し て キチ ン と
S・C・H・O・O・L の 順に 取り だ いね 。
人 2 は ・ < し
角 as asazeeeoroG 唱 ロ ・<・ <
を wsg 移 ae ぐる を e は ><< < し が
前
錠 e wa 区 seceeoxvx 則 GO
免疫 全 ああ 相克 人 ゆ 芝 二 彰 湖
に 信介
し 朋 往 まま まま まき
や や 難し い 2 面 。 ど ご こ か
で 壁 に つけ と いて 、 じ レ じ つく
り 道 を 考え て みよ つう 。
し 計 半 き
* 旨 *
多 品 *
に 才 *
* 各 <
人
人
人
タッ チ ダ ウン 心 ウ ィ ン キ ー ソ フト (会 06-372-8566) PC-8801, mk II テープ \4,000、5 イ ンチ ディ スク \6,000 久 ア メ
リカ ン フ ツ ト ボ ー ル の シミ ユ レ ーション ゲー ム 。 フ ォ ー メ ンション チェ ンジ で パラ エ テ ィ に 富ん だ 攻撃 が で きる 。
レル /
に JNNJdD 党
ぷ 民 准 へ ヽ へ 届 慢 mAS 必 へ ひざ て erelett9t し 宙 dm 司 と HN 慎
^wT」
19
29
39
49
S9
69
79
89
99
190
119
120
130
1 49
150
169
170
189
190
290
219
229
239
249
259
269
279
289
2909
399
319
329
339
349
359
369
379
389
399
4909
419
429
430
449
459
469
479
489
499
S99
S19
っ 29
S39
o49
SS9
S69
o79
S99
S99
699
610
629
639
640
659
669
679
689
_ 699
イグ /
799
719
720
' 還 還 間 間 昌 間 間 間 還 較 シヨ キ + セッ テイ 還 間 昌 間 間 間 間 昌 昌 還
WIDTH 49,25:CONSOLE 9.25.9.9:RANDOMIZE TIME/4:DEFINT A-Z
DIM ME$(5) , し も (5) ,U$ も (6) ,M1(25) ,N1(25) ,M2(25) ,N2(25 )
っ SC=9:EN=9:SX=1:SY=9:X=3:Y=3:LO=9:HIS=1999:MEN=@ : LMEN=9 : XX=9:CC=59:J=1
FOR E=1 TO 5:READ ME$(E):NEXT
FOR E=1 TO 25:READ M1(E),N1(E) ,M2(E) ,N2(E) :NEXT
uo>5>=>5※〔… パ 〔 ペ 。 # 誤 ゆあ を 組 = 5'5〔
CLS
U$(1)="
U$( 2 ) = アア 男
U$ も (3)=" 男 ど 較 画
U も (4)=" 圏
U$(5)="
U$( 6 ) =SPACE$( 33)
FOR Q=1 TO 6
FOR Ww=6TO Q STEP-1:COLORQ ELOCATE3 ,W:PRINTU も SB(Q)
NEXTW,Q
LINE(9.8)-(39.24)。"w".3。B
COLOR5:LOCATE7Z,11:PRINT "KEY"
COLOR7:LOCATE5,13:PRINT" 8
LOCATE5,15:PRINT"4 一 6"
LOCATE5,17:PRINT" 2 「
COLOR4:LOCATE29,19:PRINT"@"+CHR も ( 254 )+CHR$ も (254)+" ..。 YOU"
COLOR6:LOCATE29,12:PRINT" ・ ..。 ENERGY 1"
COLOR2ELOCATE29.14:PRINT" $ ... 5 POINT"
COLOR3:LOCATE29.16: PRINT" @⑲ .. し 2 POINT"
COLORS :LOCATE29.18:PRINT" ロロ ・・・ カト"
COLOR1 :LOCATE29.29:PRINT "| X ..。 ジラ イ "
COLOR5 :LOCATE13.22:PRINT"[HIT ANY KEY]" :T$=INPUT も (1 )
CLS:X=3:Y=3:SX=1:SY=9:LO=9:EN=9:XX=9
MEN=MEN+ 1 : LMEN=LMEN+ 1 : IF LMEN=6THEN LMEN=1:FOR E=1TO 5:L$(E)=" "ENEXT
V=LEN(ME$(LMEN ) )
' 還 還 昌 間 間 間 琴 較 力 ^ メン サク セイ 還 是 昌 昌 間 間 間 間 間 間
LINE(2.2)-(28.23) "回" 1.B
LINE(29.2)-(39.23) ," 還 "。5。B:LINE(29.2)-(39.6)。"% "3。B
COLOR6 :LOCATE3, 1:PRINTUSING"MESSAGE くく く & &>22" 5 ME も (LMEN )
LOCATE39.3:PRINT "MESSAGE"
LOCATE39.8:PRINT "HI-SCORE“
LOCATE33.11:PRINT "SCORE"
LOCATE32.14:PRINT "ENERGY“"
LOCATE35.17:PRINT "MEN"
COLOR7:LOCATE36.18:PRINT _ USING 「 柱 村 "jiMEN
FOR D=1 TO 29:NEXT
LOCATE19,12:PRINTUSING" 杜 men START "iMEN
LINE(3。3)-(27 22) 。"・”"、6,.BE
FOR R=1 TO 5
LINE(M1 (J) 。N1(J) )-(M2(J) 。N2(J)) "HP 5:J=J+1:1F J=25 THEN J=1
NEXT
FOR R=1 TO (LMENx5 )
M3=(RND( 1 )x24)+3:N3=(RND( 1 )x19)+3
D=SCREEN(M3 ,N3):IF D く <>165THEN 599 ELSE LOCATEM3,N3:COLOR2EPRINT "を
NEXT
FOR R=1 TO LMEN/2
M4=(RND( 1 ) x24 )+3:N4=(RND( 1 )x19)+3
D=SCREEN(M4 ,N4):IF D<>165THEN 549 ELSE LOCATEM4,N4:COLOR3:PRINT "の
NEXT
FOR R=1 TO LMENx19
M5=(RND( 1 )x24)+3:N5=(RND( 1 )x19)+3
D=SCREEN(M5 ,N5) : IF D<>165 THEN 589 ELSE COLOR1 :LOCATEM5 ,N5:PRINT"X"
NEXT
FOR R=1 TO V
M6=(RND( 1 )x24)+3:N6=(RND( 1 )x19)+3
D=SCREEN( MG6 , N6 )
IF D=16STHEN669
GOTO 629
LOCATEM6 , N6 : COLOR7 : PRINTMID$ も (ME も (LMEN ) , KR, 1 )
NEXT
FOR D=1 TO 1999:NEXT
* 画題 間 還 間 昌 還 本 本 昌 キ - ニ っ ウリ ヨク (YOU イト “ ウ ) 回 還 還 還 間 間 間 間 昌 較
1 $= INKEY$ も
IF !$="4" THEN SX=-1:SY=9
IF I$="6" THEN SX=1:SY=9
739 IF 1$="8" THEN SX=9:SY=- 1
749 IF 1I$="2" THEN SX=9:SY=1
7S50 ' 還 還 間 間 間 間 間 間 還 還 間 )\ ン テイ
769 X=X+SX:Y=Y+SY:D=SCREEN (X,Y)
779 IF D=9 THEN 869
789 IF D=135 THEN X=X-SX:Y=Y-SY:GOTO 869
799 IF D=219 THEN X=X-SX:Y=Y-SY:GOTO 869
899 IF D=165 THEN EN=EN+ 1 :GOTO 869
819 IF D=249 THEN 1129
829 IF D=234 THEN SC=SC+ 19:GOTO 869
839 IF D=233 THEN SC=SC+RND( 1 )x199:GOTO 869
6849 IF D=254 THEN BEEP:EN=EN-59:GOTO 869
859 LO=LO+ 1 :K$=CHR$(D) :L$(LMEN ) = し も (LMEN ) +K$
869 FOR D=1 TO CC:NEXT: IF CC く <19 THEN CC=589
879 COLOR4:LOCATEX,Y:PRINT"@":LOCATEX-SX,Y-SY:PRINTCHR$( 254 ) : BEEP1 : BEEP9
889 IF SC>HIS THEN HIS=SC
G90 ' 画 還 還 昌 間 間 間 間 間 症 較 トチ ッ ウ ケッ カノ ヒ ヨ ウ シ ~ 還 還 還 還 間 昌 間 間 間 間 議
999 COLOR7:LOCATE39 , 4:PRINTL$(LMEN )
919 IF LO=V THEN GOSUB989
929 COLOR7 : LOCATE33 ,9:PRINTUSING" 本 "jHIS
939 LOCATE33,12:PRINTUSING" 柱 提 提 壮 拓 " 1 SC
949 LOCATE33,15:PRINTUSING" 韻 拉 持 半 拓 " : EN
959 IF EN<9 THEN 1129
969 GOTO 799
97 ' 還 還 昌 間 間 間 間 症 昌 メン クリ ア 還 還 間 間 間 間 間 較
989 LINE(3,.3)-(27.22) 。" 還 ".9,BF
999 IF ME$(LMEN) =L$ も (LMEN )THEN SC=SC+590
1999 COLOR 5:LOCATE6.5:PRINTUSING" 揚 寺 men Clear "jiMEN
1919 COLOR7:LOCATE3,8:PRINTUSING" SCORE 半 后 半 ## " SC
1929 LOCATE15.8:PRINTUSING" ENERGY 拉 持 # 寺 ":EN
1939 COLOR2:LOCATE4.19:PRINT "SCORE"
1949 FOR EN=EN TO 9 STEP-1
1959 LSC=XX+SC: BEEP1 : BEEP9
1969 LOCATE 9.19:PRINTUSING" 欄間 提 韻 半 + 韻 韻 韻 斗 = 提 持 韻 拓 "1SCiEN:LSC
1979 XX=XX+1
1989 NEXT:SC=LSC:CC=CC- 19
1999 FOR D=1 TO 5999 :NEXT
1199 GOTO 399
1110 ' 還 還 間 間 間 間 間 間 間 症 昌 ソ "-/、 オー) ハ \)~ - 上 昌 昌 間 間 間 間 間 間 半
1129 FOR D=1 TO 7:COLORD:LOCATE19,12:PRINT "GAME OVER" :LOCATE7 , 13:PRINT "モウ イチ ト ~ ヤ リマ
7 し Y/N) “
1139 G$=INKEY$:IF G$="Y"OR G$="y"THEN SC=9:MEN=9 :LMEN=9:J=1:FOR E=1 TO 5:L$ も (E)="
"・NEXT:GOTO399ELSE IF G$="N" OR G$="n"THEN END
1149 NEXT:GOTO 1126
115 り ' 還 還 間 間 間 間 症 症 本 蘭 メッ ヤー シー . カ ヘー ノ テ ~ー タ 敵 還 還 間 間 間 間 間 還 間
1169 DATA SCHOOL , TECHNO ,POLIS,BASIC,FLOWER
0 00 2 25 く 1 の.4 19.20、19 14 95.14、20.15.5.18.20、16.9.16.20.8.5.12.12.12.19
> ウ ュ 2006 12、25.5、19、19 05 20.15 5、159、20.5.5.26.5.5、12.25.12.5.20 25.28.11.6.11 1
20、1 ま は 20.10.5 56、25.0.5、11.25.141.5.17.25.20.5、12.5,/14.25、11.25 193.5.5.8.20,22.5
ぅ 25 。 2
60 DAIA 5.22 5 9.20.23、20.8.8.22、17
田 交 数 リス ト ・ CO…… 自 分 が 動 こ と き の ス ピー: 690-740 キー 入力 > ペ ツ セー ジ を そろえ たら 、 フ
MES( )…… メ ツ セ ー ジ 5 ド 調整 ・ 750-850 何 に ぷ ぶつ か つ だ か : アン フタ アー レ ぐ らい は ほし いな 。
LS( )…… 自 分 が ひろ つた メ ツ ・ V…… メ ツ セ ー ジ の 長 さ の 判定 ・ 自分 の 歩い た 跡 を 踏む と 、 工
セー ジ ・RR…… 画 面 作 成 の だめ の ルー プ : 860870 自分 の 表示 ・ イル キー が 50 減 る けど 、 慣 れ な
US( )…… タ イト ル ・ D…… 何 に ぶつ か つた か 判断 用 ・ 880 ハイ スコ ア の 入れ ・ いう ち は き つい で すね え 。840 行
M1()N1OJM2C)N2( )… | ゆ …… キ ー 入 力 用 変え ・ の EN=EN- 50 の 50 の 値 を も
画面 の デー タ ・ KS$…… ひ ろ つ だ 文字 ・ 890-940 スコ ア , ひろ っ た ・ う 少 し 小さ くし まし よう 。 ま た 、
SC…… ス コア ・ G$…… リ プレ イ 入 力 用 。 メッ セー ジ な どの : ハー ト を 取る と 、 ス コア は 加算
HIS…… ハ イス コア ・ 還 プロ プラム の 説明 ・ 表示 ・ され ます が 、 エ ネル ギー も 補給
EN…… エ ネル ギー ・ 10- 40 初期 設定 (第 1) ・ 950-960 エネ ルギー 切れ 判 : され て も いい と 思う 。830 行 の 〇
SX.SY…… 自 分 の 進行 方向 ・ 50- 60 デー タ 読 み 込み 処理 ・ 断 ・ OTO860 の 前 に EN=ENT+RN
XY…… 自 分 の 座標 ・ 70-170 タイ トル 表示 ・970-1100 面 フ リア の 処理 ・ D(1)*50 と で も し た ら ど うか
LO…… 自 分 が と つ だ 文字 数 = ・ 180-290 ゲー ム の 説明 表示 ・1110-1140 GAMEOVER : な 。 時 間 制 限 を も うけ て 、 面
MEN-…… 面 数 ・ 300-320 初期 設定 (第 2) ・ 1150-1180 メッ セー ジ , 画面 : リア 時 に 残り 時 間 を ボー ナス と
LMEN…… メ ツ セ ー ジ , 画面 の ・ 330-680 画面 作成 ・ デー タ ・ し て 加算 する こと いう の も いい か
選択 ・ 690-960 メイ ン ル ー チ ン : チ ェ エッ フ ポ イン ト ・ な 。 娘 バッ チリ 賞 。
ピタ
婦 コ の 追っ が け は な が な が か しつこく
ちょ っ と 気 を 許す と た ち ま ち つ か まっ
EN まつ を 6
ヽ や ゆう じ MAN に は 武 父 は な い が 、 画面
N 遊び 方 の 右側 に ある 4 つの くぼみ か ら 、 反 対
主人 公 は ゆう じ MAN。 これ 、 作者 の 側 の 通路 へ と ワー プ す る こと が で きる 。
悪友 を けなし て や ろう と 作り 出 き れ た この ワー プ を 使っ て 、 タ コ と の あい だ
4 えい つ 、 ワ ー プ だ /
キヤ フク ク な ん だ で く ナ だ 。 に 適当 な 距離 を 保ち な が ら ド ッ ト を 取
ゆう じ MAN を |2|4I6I8S| キ ー で 上 下 。 っ て いこ 2。
左右 に 動か し て 、 タ コ ユ の 追撃 を か わし 、 と きど き 現 れる オレ ンジ は ボー ナス
ドッ ト を 1 つ 残 6 ら ず 食べ て し まう 。 フル ー ツ 。 で 6、 こ の うえ を グラ が 退
る と だ た だ の ドッ ト に も どっ て し まう の
の の と らら の も ちあ
ん に 人 人 WW る さてと 。
面 を クリ ア し て いく
と 。 ジッ ク グ の 仙 が 変わ
り 、 オ レン ジ の 数 も 増
えて 難し く な っ て いく
で ら
が に 8 則 つ が まる
と ゲー ム オ ー バ ー。 リ
ブレ アレイ し だ いと き は 、
[Y キ ー を 押 を そう 。
ei
。 。2 革 問 半 wm こ マ ロ ー か 1
江間 YY So の oo の 前 直 。 時 混 苦
「V〉2H』」 「Q ァ ミーー ビ で 』
1 持
年 つ
HH
5 い
ケ る
月 機
種
今 は
F
P M
に 半
4
で
トマ
よ イ
楽 は
|. 憎 〇 如 陸中 ささ FmSm ら 立 居 型
一 変数 リス ト
月 be た NT スグ
YUJIC)……YUJIMAN キ 、
ャ ラク 2 ' 較 YUJI GAME part.1 男
OTACO%( )…… だ こ や ん キ 6 男 COPYRIGHT BY BACKS 画
ラク タ
JI%( )……SPACE キ ャ ラク フタ
FUR%( )…… ポ イン トキ ャ ラ
69 DEFINTA-Z:HI=1999:COLOR7.4:WIDTH49.25:PLAY"V15T255":DIM YUJIX(98) 、OTACO%(98 )
JI%(98) .FUR%(98) ,FLT%(98 )
79 ' 還 還 還 本 昌 ショ キ セッ テイ 還 還 間 昌 間
89 FOR I=9 TO 6:COLOR=(1,9):NEXT:GOSUB 849
99 GOSUB899 '@@ TITLE SUB GOSUB @ る
2 ダ 199 MAN=3:ROUN= 9 : ROUND= 1 : SC=9
Oo xss オト ルッ ツジ エキ ヤラ 119 COLOR9 ,4:CLS:RS=19- (ROUND-1):IF RS<9 THEN RS=RS+1
FLT( ) と | 129 COLOR=( 1 .ROUN) : COLOR=( 4,7 )
の ん 139 LINE(9,1 )-(39,24) ," 較 "1.B:FOR IT=4 TO 24 STEP6:FOR J=3 TO 39 STEP 8:LINE(J,!)
-(J+5。1+3) 。" 國 "1.BF:NEXT:NEXT:LINE(9、22)-(39.23) ," 還 "1.B
MAN……YUJI MAN の 数 “ 加
タッ
149 FOR 1=16 TO 699 STEP 128:FOR J=16 TO 179 STEP 16:PUT@A( 1 エ ,J)-( 1 エ +31 。J+15 ) ,FUR%
, PSET : NEXT : NEXT
159 FOR 1=16 TO 179 STEP 48:FOR J=16 TO 699 STEP 32:PUT@A(J。T)-(J+31 ,1+15) 、FUR%,
PSET : NEXT:NEXT
169 SYMBOL(39 ,189 ) "PLAYER" ,3,1 .7:MA=9
179 FOR I=399 TO 698 STEP 32:MA=MA+1:IF MA=MAN THEN 189 ELSE PUT@A(I,178)-(I+31,
178+15 ) ,YUJI%,PSET : NEXT
189 LOCATE1 ,9:PRINTUSING"SCORE・ 柱 提 失 韻 寺 HI-SCORE・ 提 音韻 寺 ROUND・ 拉 "1:SC:HI:ROUND
199 PLAY"L804CCCCFFDDEGFFCDAAAAAA":FOR TI=9 TO 5999:NEXT
200 ' 還 還 昌 間 昌 間 間 間 本 昌 MAIN LOOP 男 還 還 間 間 間 昌 間 間
2Z19 X=16:Y=169:A=528:B=16:R=1 :MSS= 1 : POI=9:SD=3:RANDOMIZE TIME
229 IF INT(RND( 1 )xRS)=9 THEN GOSUB 479
239 PUT@A(X,Y)-(X+31 、Y+15) ,JI%,PSET
249 IF POI=195 THEN 739
259 A$=INKEY$:IF A$="6" THEN SD= 1
269 IF A$="4" THEN SD=2
279 IF A$="2" THEN SD=3
289 IF A$="8" THEN SD=4
299 ON SD GOSUB 429,439,449,459
399 PUT@A(X,Y)-(X+31 ,Y+15) ,YUJIX、PSET
310 IF MSS= 1 THEN PUT@A(A,B)-(A+31,B+15) ,FUR%,PSET ELSE IF MSS=2 THEN PUT@A(A,B)
-(A+31 ,B+15) , JI%,PSET
329 IF MSS=3 THEN PUT@A(A.B)-(A+31 、B+15) ,FUR% ,PSET : PO!I =PO1 - 1
339 IF A<X THEN A=A+32:GOSUB589 : GOSUB529
349 IF Ax>X THEN A=A-32:GOSUB599 : GOSUB529
359 IF B く Y THEN B=B+16:GOSUB699 : GOSUB5260
369 IF B>Y THEN B=B- 16:GOSUB619 : GOSUB529
379 PUT@A(A,B)-(A+31 ,B+15) ,OTACO%, PSET
389 IF X=A AND Y=B THEN GOSUB 639
399 IF X=592 THEN GOSUB 779
499 GOTO 229 ' Main Loop End !!
419 ' 還 還 還 昌 詳 較 本 間 SUB 10OT INE 男 還 間 症 還 還
429 X=X+32:GOSUB549:PLAY"L6404CDE" : R= 1 : GOSUB599 : RETURN 古 軒 MOVE SUB 蘭 軒
439 X=X-32:GOSUB559 :PLAY "L6404CDE" : R=2:GOSUB599 : RETURN
449 Y=Y+16:GOSUB569 :PLAY"L6404EDC" : R=3:GOSUB599 : RETURN
459 Y=Y-16:GOSUB579:PLAY"L6404EDC" : R=4 :GOSUB599 : RETURN
469 SC=SC+39:LOCATE7 ,9:PRINTUSING "林寺 杜 #" SC:PLAY "L1606CEDC" : RETURN 還 田 オレ ン シ ` 回 男
479 EF=INT(RNDX16)+1:FE=INT(RNDx4 ) :EE=EFx32+16:FF=FEx(16x3)+16
489 IF POINT(EE+16.FF+7)=-1 THEN RETURN
499 PUT@A(EE,FF )-(EE+31 .FF+15) ,FLT%,PSET : RETURN
599 IF POINT(X+16,.Y)=- 1 THEN 469 ' 還 較 ショ ウ カ ` イ フ ^ ツ SUB 斑 還
S19 IF POINT(X+15.Y+7)=-1 THEN POI=P0I+1:SC=SC+5:LOCATE7 ,9:PRINTUSING" 柏 提 半 半 "1SC:
PLAY"L6405DEC" :RETURN ELSE RETURN
S29 IF POINT(A+16,B)=-1THENMSS= 3 : RETURN
S39 IF POINT(A+15,B+7)=-1THEN MSS=1:RETURN ELSE MSS=2:RETURN
549 IF POINT(X+18.Y)=-1 THEN X=X-32:RETURN ELSE RETURN
S59 IF POINT(X.。Y)=- 1 THEN X=X+32:RETURN ELSE RETURN
S69 IF POINT(X,Y)=- 1 THEN Y=Y-16:RETURN ELSE RETURN
579 IF POINT(X,Y+8)=-1 THEN Y=Y+16:RETURN ELSE RETURN
S69 IF POINT(A+18.B)=-1 THEN A=A-32:RETURN ELSE RETURN
599 IF POINT(A、B)=-1 THEN A=A+32:RETURN ELSE RETURN
699 IF POINT(A,B)=-1 THEN B=B-16:RETURN ELSE RETURN
619 IF POINT(A,B+8)=-1THEN B=B+16:RETURN ELSE RETURN
629 ' 証 還 還 本 昌 GAME OVER SUB 還 還 還
639 PLAY"V15L6402CDEFG"
649 FOR 1I=9 TO 899:NEXT
659 PLAY"V1503L4C02BAGFEDC" :MAN=MAN- 1
669 IF MAN=9 THEN 689
679 FOR I=9 TO5999:NEXT:GOTO 119
689 SYMBOL( 39 , 89 ) , "GAME OVER" ,8,4.9
699 IF SC>HI THEN HI=SC:SYMBOL( 329 , 129) ,、 "HIGH SCORE" 3,2.9
799 COLOR=( 1 .7) :A$=INKEY$
719 IF A$="Y" OR A$="y" THEN 99 ELSE IF A$="N" OR A$="n" THEN FOR I=9 TO 7:COLOR
=(T,T):COLOR7.9:CLS:PRINT "END ! "EEND
729 GOTO 79 り ' 証 較 本 本 間 ROUND CLEAR SUB 還 還 還 間 昌 時
739 CLS:ROUN=ROUN+ 1 : ROUND=ROUND+ 1 : IF ROUN=8 THEN BEEP:SC=SC+ROUNDx199:ROUN=9
749 SYMBOL(9,89), "ROUND CLEAR",7,4.6:COLOR=(4,9)
759 PLAY"T189L805GGGAGGO06CCO05BBAAGGGGGGFFFFFFEEEER64EEDDCCDDEEEEEET255"
769 FORI=9TO8999:NEXT:GOTO 119 ' 還 還 還 還 還 間 WARP SUB 還 還 間 還
779 PUT@A(X.Y)-(X+31 .Y+15) ,JI%,PSET
789 X=16:PLAY"V15L6405CDEFGAB" : GOSUB599 : RETURN
799 ' 還 還 還 間 本 TITLE SUB 回 還 昌 昌 寺
899 COLOR7 .9:CLS:SYMBOL(39 59 ) , "YUJI MAN",9.5.6
819 LOCATE8.29:PRINT"HIT ANY KEY TO START !!":
829 IF INKEY$="" THEN 829 ELSE RETURN
839 ' 還 還 還 本 間 CHARCTAR SUP 還 還 較
849 LOCATE15,.12:PRINT"DATA READ":FOR 1=2 TO 95:READ YUJI%( 1 ) :NEXT
959 DATA 31,-32768,.51 1 ,-1924,511,-1924.9.9.9.9,.9,9,9,9,0,9.0.0.0.0.9.9,0,.9.9,.9.9
・9.9.9、9.9,31、-32768,511,-1924.511、-1924
869 DATA 415,15369,462.31744.2947,-1924,2947,-2948.255,-2394 511.-1984,1923,-729
・1923,-616,.9.9.9.9.9.9.9.9,-64.16383,-993,-32257 ,-513,-513
879 DATA -513,-513,-699.15871 , -3634 .32255 , -2949,-513,-2949,-1925,-271 ,-3841,-769
5,-1985。-13313,-1999,-25691 ,-1917,-2948.3,-49.16383、-2933,511,-1,-1
889 FORI=33TO95:READ OTACO%( 1 ) : NEXT
899 DATA 9.31、-256.255。-16 1923。-8.2944,-2.2935,-2、1999,-2.32767,-2.32767、-4。327
67,-8.1923、-16.8191.-4.32767,。-2,-97,-7169,-481 ,-16257
999 DATA 9,9,-1,-1、-32.255,-256,15,-1924.7,-2948.1,-2948,1 ,-2948.1 ,-32768.1、-327
68.3,-32768.7,-1924,15,-8192.3,-32768,1.96.7168,489,、16256,-1,-1
919 GETQA(9. り )-(31.15) ,JI%.G
929 CIRCLE(16.9).16.6,,、,F:CIRCLE(16.9).16.9,,,。N:LINE(15.9)-(17.2) ,PSET , 9 , BF
939 PSET(19.6.9):PSET(19,19、9):PSET(29.15.9):PSET(7.8.9):PSET(25.8.9):PSET(15,19
・8):PSET(8.13.9):CIRCLE(25.2).8.5、.2。,.F:CIRCLE(25 2 ) ,8.9,.2,,,N:GET@A(9、9) -(31,
15 ) ,.FLT%,G:CLS
949 CIRCLE(16.8) ,4.2、,。、F:GETQA(9、9)-(31.15) ,FUR%、G:COLOR9 .9:CLS:FORI=1TO6 :COLOR
=(】.T):NEXT: RETURN
ERU 還 症 Uopoo〈u。
969 " 較 All BASIC Program 副
EEAD 衣 間 ho WW〔5〈#※@
バン
ん
OUONSsw ラ ウン に カラ ー
ROUND…… ラ ウン ド 数
RS…… オ レン ジ の 出る 量
XY……YUJI MAN 座 標
ALB…… だ こ や ん 座標
R……MOVE 用 ON GOSUB
タダ
MSS…… ポ イン ト 、 ス ペー ス 、
オレ ンジ 識別 用
POI…… ポ イン ト の 数
SD……YUJI MAN 進 行 廊 向
デー タ
A や 時 て と キー 人 入力 用
EF,FF…… オ レン ジ 座 標
田 プ ロブ ラム の 説明
10~ 50 REM 文
60-100 初期 設定 1
110-190 初期 画面 作成
210 初期 設定
220 オレ ンジ 出現 判断
230 YUJIMAN を 消す
240 面 フ リア 判断 MIl
250~290 キー 入力 ざ
300 YUJI MAN 表 示 5
310~320 た こ や ん を 消す NN
330~ て 360 た こ や ん を 動か す 潤
370 た こ や ん 表示
380 GAMEOVER 判 断
390 ワー ブ 判 断
410-450 MOVE サ ブル ー チ
ッ ンク
460~490 オレ ンジ サブ ルー チ
2
500-610 障害 物 サ プル ー チ ン
620~-720 GAME OVER サ
ブリ ルー チッ
730~760 面 フ リア サブ ルー チ
ン
770~ て 780 ワー プ サ ブ ルー チン
790~820 タイ トル サブ ルー チ
ン
830~940 キヤ ラフ タデ ー マ
田 チ ェ ン フ ボ イン ト
だ たこ や ん は 、 角 を ワー プ す る
の で 、 面 フク リア は な か な が 難し
い 。 せ め て 、 面 クリ ア 時 に YUJ
IMAN を 1 人 増やし て は どう か
な 。740 行 の 最後 に :MAN=MA
N+1:F MAN〉 5 THEN M
AN= ら と し まし よう 。 それ か
ら 、 リ プレ イ の 表示 が な い の で 、
700 行 の 最後 に :SYMBOL(250,
150 REPLAY (Y ン NP"
3.2.O と 入れ て お きま し よう 。
支 バ ッ チ リ 賞 。
エミ ー 心 アス キー (会 03-486-7111) PC-8001, mk II プ 8801,mk IT つ 5 イ ンチ ディ スク Y\4.,800 合コン ピュ ユー を 頭脳 と 3
する エミ ー ち や ゃ ん に 言葉 を 教え 、 会 話し て いく ニュ ユー タイ プ の アド ベン チャ ー。 彼女 の 気分 次 第 で ムフフ ウス タイ ル に ……。
WW
WW
生 UM
て この COUNT が 0 に な る と 、 ア タッ
カー が あと 何 機 残 っ て いて も ゲー ム オ
ーー に が っ て し よう の だ 。
し た り 小 さく し た り し な が ら 高 度 の 一 敵 を や っ つけ た と き の ポ イン ト は 、
致し た と ころ て 攻撃 し な いと 効果 が な 5 30 点 の 範 胃 で ラン ダム に スコ ア に
い の だ 。 も ちろ ん 、 敵 の 攻撃 を 、 高 度 加算 きれ る 。 高 得点 を あげ る に は 、 運
遊び 方 を 当たる さと て よる こと も て きる ゐ 。 も 必要 と いう こと だ 。
キー は [2|4|6]8l。 左 右 の 移動 記 4I6 ト 敵 の 高度 に あわ せ て 大 きく な っ た り
SPACE ATTACK シ リー ズ 、 1 、 高度 を 変え る の 旭 2| (下がる )、[8| (上 小さ く な っ た り 0。 宇宙 の 広がり を ちょ
2 に 続く 第 3 弾 ( ほ い っ て も 1、2 は が る )。 ビー ム は スペ ー ス ・ キ ー が だ 。 っ ぴり 感じ きせ て くれ る ゲー ム だ
発表 し て な いけ ど ね )。 アタ ッ カ ー は 3 機 あり 、 ー
一 見 、 ふ つう の スペ ー ス ・ シ ュー テ 全部 や られ る と ゲー ム オ ー
ィング ・ ゲ ー ム に 見 える けど 、 ひ と 味 。 バー だ 。
違う グラ フィ ッ ク が 決め 手 。 も うい ひと つの 、 で も 00NT6
敵 の 不思議 な 飛行 物体 は 3 段階 の 大 。 表示 きる れ た 数 が ある 。
きる て 変化 する 。 実 は この 大 きる が 高 これ は 、 最初 240 秒 で は じ
度 を 表し て いて 、 キ ミ も 自 機 を 大 きく まり 、 ビ ー ム を 撃つ た びに
2 秒 ず つ 減 っ て いく 。 そし
マ まだ 命中 。 ち えつ 、 で も
だ つ だ の 10 点 。 ケ チン ツ /
ぐつ だ /
人
HOE4
.
SO 旗 #
一 。 上 〇
53
トー
4
| 1
| 年
8
| 9
月
4 COMNT #
39
を TICKER #
の き 8 燈 HrYH で
桂 送 月 。 隊 憶 汰 / さ %% 議 功 ロ の 避 半 当 鹿
、 癌 び 琴 8 補 麻 。 油 員 田 閉 選 外
。 うけ 落 。 ロ キ @ 陣 其 / ホ Y き
8 ぶ
3
440
F:PUT@A(X,Y)-(X+23.Y+1 1 ) ,E1%,PSET
459
REM ) て うれ) け ル )( う て ひも) て JJ) て (は ()()【)() う (1) て )1()()( け (て よ て ) て )1) け {)()
REM て {} }(
REM }{ ら PF 衣 を E ATTACK 3 {}
REM て {} }(
REM }( 9 は 、 ッ J 9 9 2 By 、 の っ 9 { }
REM {} } て
KEM キナ ん た よ ( よ ()1)()() け 1 )1) け 1)11)()( う パ )( は () て )( )()()1 け て )( け 《)
の em この は たら コン コー INITIALIZE
SCREEN 7,7:COLOR 3.9:WIDTH 89,25:RANDOMIZE TIME:DEFINT A-Z
FOR S=9 TO 199:PSET (INT(RNDX649) ,INT(RNDx299 ) , INT(RNDX5+2 ) ) : NEXT
DIM A1%(55 ) ,A2%(95) ,A3%(169),E1%(55) ,、E2%(95) ,E3%(169 ) ,S%(169):H=9
SYMBOL (29.89) , "SPACE ATTACK" 4.3,1:SYMBOL (599,79), "3"。8.6,1
SYMBOL (24.82), "SPACE ATTACK"。4.3.2:SYMBOL (592.72). "37.8.6,2
SYMBOL (399.156), "By ウー が ゲ ウ "。3,1。1
SYMBOL (24.82) 。"SPACE ATTACK" ,4.3.3:SYMBOL (592.72) "3".8,6,3
FOR L=9 TO 53:READ A1%(L):NEXT:FOR L=9 TO 95:READ A2%(L):NEXT
SYMBOL (29.89) , "SPACE ATTACK",4.3.6:SYMBOL (599,79) "3",8.6,6
SYMBOL (24.82) "SPACE ATTACK",4.3。4:SYMBOL (592,.72)、"3".8.6,4
FOR L=9 TO 157:READ A3%(L):NEXT:FOR L=9 TO 53:READ E1%(L):NEXT
SYMBOL (29.89) , "SPACE ATTACK",4.3,7:SYMBOL (599,79)."3".8.6,7
SYMBOL (24.82) 。 "SPACE ATTACK",4.3.5:SYMBOL (592.72) "3".8.6,5
SYMBOL (392,.151) "By ウ - ゲ ウリ 3,1.5:FOR L=9 TO 95:READ E2%(L):NEXT
FOR L=9 TO 157:READ E3%(L):NEXT:COLOR 5,9:CLS
LINE (472.9)-(639,199) ,PSET,2.B:LINE (475,.2)-(636,197) ,PSET, 7,B
SYMBOL (485.7), "SPACE" 。2.2.1:SYMBOL (495,.24) ,、"ATTACK "2.2。1
SYMBOL (482.9) "SPACE" ,2.2.3:SYMBOL (492.,26) ,、"ATTACK" ,2.2.3
SYMBOL (595.80)。、 3 "5.5.T5SYMBOL (592.10)、 3".5.5.6
LOCATE 62.7:PRINT "% HI-SCORE %"5:LOCATE 62.11:PRINT "% SCORE ※":
LOCATE 62.15:PRINT "% COUNT %"i:LOCATE 62,.19:PRINT "% ATTACKER ※"*
FOR S=9 TO 59:PSET (INT(RNDx479) , INT(RNDx299 ) 、INT(RNDx6+2 ) ) : NEXT
LOCATE 29.12:COLOR 3:PRINT "HIT ANY KEY!"::T$=INPUT も (1 )
ご me の こら どど GAME START
LOCATE 29.12:PRINT SPC(12)::P=9:A=3:B=230 :C=1:T=9
LOCATE 72.9:PRINTUSING " 提 持 "5HELOCATE 74.13:PRINT P・:LOCATE 74.21:PRINT Ai:
PUT@A(B,177)-(B+31.192).A2%。PSET:TIME$="99:99:90"
X=RNDX439:Y=RNDx159:Z=1:PUT@A(X,Y)-(X+31 ,Y+15) .E2% PSET
IF 249-TIME-T く 9 THEN LOCATE 75.17:PRINT "9"::GOTO 899
LOCATE 73,17:PRINTUSING "本 拓 拓 "1249-TIME-T
S0UND 9,32:SOUND 1.1:SOUND 2.238:SOUND 3.9:SOUND 4,122:SOUND 5,9:SOUND 7,63
S0UND 8.16:SOUND 9,11:SOUND 19.9:SOUND 11.8:SOUND 12,.1:SOUND 13,8
PSET (INT(RNDX479 ) ,INT(RNDx299 ) , INT(RNDx6+2 ) )
E=RNDX39-15:F=RNDx29-19:G=RNDx2-1:1F Y+F<9 OR 155<Y+F THEN 479
IF -1 く <Z+G AND Z+G く 3 THEN Z=Z+G
IF Z=9 AND -1<X+E AND X+E く 431 THEN PUTQA(X,Y)-(X+39.Y+29) ,5%,PSET:X=X+E:Y=Y+
IF 2Z=1 AND -1 く <X+E_ AND X+E く 431 THEN PUT@A(X,Y)-(X+39.Y+20 ) ,S%,PSET : X=X+E:Y=Y+
F:PUT@A(X,Y)-(X+31 ,Y+15) ,E2%, PSET
469
IF Z=2 AND -1 く <X+E AND X+E く 431 THEN PUT@QA(X,Y)-(X+39,Y+29) ,S5%。PSET : X=X+E:Y=Y+
F:PUTQA(X,Y)-(X+39,Y+29 ) ,E3% , PSET
479
489
499
S99
So19
S っ 2
ゃ 1/
S49
IF INT(RNDX19)=2 THEN 559 ELSE IT$=INKEY$:IF I$="4" THEN D=-19
IF I$="6" THEN D=19 ELSE IF I$="8" AND C<2 THEN C=C+1
IF (1I$="5" OR I$="2") AND 9<C THEN C=C- 1
PUT@A(B,175)-(B+39,195) ,S%,PSET: IF -1<B+D AND B+D<431 THEN B=B+D
IF C=9 THEN PUT@A(B,189)-(B+23.191),A1%、PSET
IF C=1 THEN PUT@A(B,178)-(B+31 ,193) ,A2%,PSET
IF C=2 THEN PUT@A(B,175)-(B+39,195 ) , A3%, PSET
IF 1$=CHR$(32 ) THEN 739 ELSE 379
559 ' ------ーーーーーーーーー U.F.0.'S BEEM
S69
o79
S69
599
699
619
629
630
649
FOR L=9 TO 3:PLAY "V9T24905C16D16E16":NEXT:FOR L=9 TO 599:NEXT
IF の =0 THEN LINE (XX+12.Y*13)-(X%f12.199) ,PSET ,6
1F Z=1 THEN LINE (X+16.Y+17)-(X+16.199) ,PSET.,6
IF Z=2 THEN LINE (X+19,Y+22 ) -(X+21 ,199 ) ,PSET , 6 , BF
BEEP 1:FOR L=9 TO 599:NEXT:BEEP 9
IE Z=9 THEN LINE (X+12.Y+13)-(X112.199) ,PSET.p
TFP 2 の =1 THEN LINE (X116.Y+17)-(X116.199) PSET,0
IF Z=2 THEN LINE (X+19.Y+22)-(X+21 .199 ) ,PSET , 9 , BF
BEEP 1:IF Z><C THEN BEEP 9:GOTO 379
BEEP 9:IF Z=9 AND B<X+12 AND X く <B+12 THEN 680@
IF Z=1 AND B<X+16 AND X< く B+16 THEN 6809
IF Z=2 AND B く <X+20 AND X く B+20 THEN 689 ELSE 3769
FOR L=3 TO 13: BEEP 1:CIRCLE (B+15.185),L,6,RND:FOR R=9 TO 59:NEXT:BEEP 9
FOR S=9 TO 299:NEXT:NEXTEA=A-1:IF A=9 THEN LOCATE 74.21:PRINT Ai:GOTO 899
PUTQA(B,175)-(B+39,.195) ,S%, PSET :B=239:C=1:PUTQA(B,178)-(B+31 ,193) ,A2%,PSET
LOCATE 74.21:PRINT Ai EGOTO 379
BPIENEOR993ー の 5 BEEM FIRE!
SOUND 7,56:FOR L=9 TO 399:NEXT:SOUND 7.58
1F し に =0 TUMEN LIME (BfF12.1799-(B ナ サナ 12 0) PSBT。3
IE 6 ヨコ 1 THEN LINE (Bt16、177)-(B+r16.0)。PSET 3
]F C=2 THEN LINE (B+19。174)-(B+21.9)、PSET.3、BF
』 ミ エキ + キ 235S0UDND 7、63:1F C=9 THEN LINE (BY12Z.179)-(B+12.、09) ,PSET 、9
IF C=1 THEN LINE (B+16,177)-(B+16.9) ,PSET .9
1 ドド し =2 THEN LINE (B+19、174)-(B+21.0). PSET. り 9.BE
IF C><Z THEN 379 ELSE IF C=9 AND X<B+13 AND B く X+12 THEN 839
IF C=1 AND X<B+17 AND B く <X+16 THEN 839
ー ミ ング へ プラッ クオ ニク ス II フ ァ イ ヤ ー ク リス タル へ BPS (会 045-421-7421) PC-8801, mk II (9801 用 も 近日 発売 予定 ) 〇 テー
た プ \4.800、5 イ ンチ ディ スク Y\7.,800 欠 前 作 の 戦士 を 使い 、 魔 法 の 要素 を 加え だ 続編 (た だ だ し 前 作 の ソフ ト が 了 め 要 )。
SPACE ATTACK 3 リス ト 続 き
829 IF C=2 AND X<B+21 AND B く <X+29 THEN 839 ELSE 379
839 FOR L=9 TO 19:BEEP 1:FOR R=9 TO 89:NEXT:BEEP 9:FOR R=9 TO 59:NEXT:NEXT
849 CONNECT (X,Y)-(X+39,Y+20)-(X+19,Y+5)-(X+39,Y+18)-(X,Y+19)-(X+35,Y+20 ) , 2
859 I=INT(RNDx6+1)x5:P=P+I:LOCATE X/8+.5。Y/8+1:PRINT I::IF P>H THEN H=P
869 LOCATE 72.9:PRINTUSING " 提 提 揚 #"5HELOCATE 72.13:PRINTUSING " 拉 持 盾 拓 "5P
879 FOR L=9 TO 299:NEXT:PUT@A(X,Y)-(X+49,Y+209) .5%、PSET:GOTO 369
889 “= GAME OVER
899 BEEP 1:SYMBOL (19.89), "GAME OVER",5.3.2:BEEP 9
999 FOR R=8 TO 19:BEEP 1:SOUND R,9:BEEP 9:NEXT:BEEP 1
919 SYMBOL (159,119),"SCORE "+STR$(P) ,3.2.6:BEEP 9:T$=INKEY$:LOCATE 25,29
929 PRINT "HIT ANY KEY!"::T$=INPUT も (1):COLOR 5.9:CLS:GOTO 240
939 CHARACTER DATA
949 DATA 16,9,14336,124,9,-512.254.9,-512.254.9,-512.238.9,-14848.139.9.9,16,9.1
4336 , 49,9,19249,313,131 ,14722,-28871 ,-7521 ,14834,-199,-383,14594,124.9.-4698,16,
9 ,14336,.56.9,14336,56,.9,14336.56.9,14336.49.9.9,9.9,9
959 DATA 1,9,3,-32768,7,-16384,15,-8192.31 ,-4996,31 ,-4996,31 .-4996 .31 ,-4996,31,-
4996,31,-4996,31 ,-4996,31,-4996,.15,-8192,4,16384.9,9,9.9.1.9.3、-32768,7,-16384.6
>-16384.6,-16384,39,-14336,-32665,-13319@,-32281 ,-12542.-39745,-12359,-24691 ,-123
92。-25 、-12290 '
969 DATA -2999,-14274,-32761 ,-16382,-32761,-16382.38,-14336,.69,39729,1.9,3、.-3276
8.7,-16384,.7,-16384.7,-16384.7,-16384.7,-16384,7,-16384,7,-16384,7,-16384.7、-163
84,7,-16384.6,-16384.4、16384.9、9,9,9
979 DATA 9,4996,.9,56.9.9.31744.9,254.9,1,-256.9、1923,-32768,7,-64,9、2947、-16384。
7,-64,9,2947,-16384.7,-64.9.2947,-16384,7,-64.9,2947,-16384,7,-64.9,2047。-16384。
3,-4224,.9,455,9,9,-32256.9.9、9,9、9,9,16.9.9,14336.9,124.9,9,-512.9.238.9,.9,-1484
8.9,238.9.8
989 DATA -489,128,.6398、12299,-32712,-456.649,-1794,15874.-31752,-449,-32113,-179
4,16354,-8,-449,-257,2392,8446,-32769,-489,.649,254,2。-32768,-512,512.254.9,9,-22
4.9,3971,-8192,9,4996.9,56.9.9.31744.9.254.9.9,-512.9,254.9.9、-512.9,254.9,9,- っ 1
2.9.254,.9
999 DATA 9,-512.9.254.9.9,-512,9,254.9,9,-512.9.254.9.9,-4698.9,198.9.9,-32256、9
59。9.9,9,9
1999 DATA 398,15,.19176,15993,-1927,-789,-3974.14951.-199.19235、391、-2806.24576.5
145,-856,3241,16386,8832.398,15,19176,15995.-1927、-789、-3974.14951.-190、19235,2
93,-2742,26916,.5145,-856,.3243.16386,8832.398、15,19176、15995.-1927,-524.-3974.149
S ト =226 10235
1919 DATA 391,-2896,24576,5145,-984.3243,16386 , 8832
1929 DATA 129,13312.769,14298.3832,14394,15899,14184,31633,15732.1976,16369,-8。1
6349 , 1399,29899 ,19922,-21848,-529,-16428,32956 .16949,16377,15696,8184,19912,1360
,5449,168,-22916.8,9,129,13312,764.14298,3832,-18464,15899、14184.31632,15732.197
8.16360 ,-8
1939 DATA 16349,5461,21849,19922,-21848,-529,-16428.32969.16949,16377.15696.8184
,19912.1361,5449,168,19752.8.9,129、13312.764,14298.3832.14394、15899,14184.31632。
15732,1976,16369,-8,16349,1399,29899 ,19922、-21848、-529,16349、32969,16949.16377.1
5696,8184
1949 DATA 19912,1361.5449.168.-22916、8、9.09、9、9,3615.12288、129。-11314.2.-6662,-24
32.3779。-1287,8223,-22581,32336、15118,31614.26742,4941,15892.-4967、19493.2776.13
9 り 1 ,17549,-8159.-8214.4768.7647,-11999,2962,-12374.1984.4977.21546.12071,-30940,2
1525 ,4437
1959 DATA 29648,2728,-21855.16389,29565,19972、168,19773.9,5396,-22528,2、-32009,0
8,9,14,7984.9.39931,-12899,737 ,-1396,-32754,-15366,-1769.8193,-13442.2P539.3707
,32369 .39351 ,-14918,-27412.6442,-23798,-19219,21844,-31529、19975,-5358
1969 DATA -22243,-8235,2956 ,3791,-21996.15375,-4789,19799,19122,-22444.5377。2184
9,。-22518,-22358,-23232.1369,21834、-32768,-22486.5376,21.5288、9,643,9,0,9.9、3615.
12288,129,-11314。2。-6662,-2432,3779.-1287,8223,-39773.31824,.15118,31614,26742,- こ
8727 16920
1979 DATA -4967,。19493.2776,1391.17549,-8159、-8214、4769,7647,-11999,2962.-12374、1
984.4977.21892.12939,-39949.21525.4437 .29648 2729,-21851,16389,29565.19972。168.-
21995。09.5397 , =22528 , 2 ,-32000、0
の
\ へ ヽ 悦 ロ om ロ AS ば へ ざさ vl9tt9t JO の 半 HN 革 に NNd 党
し
の 硬 変 数 リス ト wi イス コウ 120-150、 170-180, 200-220 : 550-710 敵 の ビー ム の 表示 と
(に A1%( )…… ア マッ カー の グラ : P…… ス コア タイ トル 画面 衝突 の 判定
ノ フィ ッ フ パタ ー ン : |$……KEY IN 用 160, 190,220230. ブラ フィ ッ ・ 720-870 アタ ッ カ ー の ビー ム
AD A…… ア タッ カー の 数 ク パ ター ン 表示 と 判定 と 処理
A2%( )…… ア マッ カー の グラ ・ BB…… ア マッ カー の X 只 標 の 読み 込み ・ 880-920 GAME OVER
240-290 表示 画面 作成
300-310 星 の 表 示 、 ゲ ー ム ス
クツ 271 タ ーッ
(中 )
930<1070 キヤ ャ ラク タダ の グラ フ
イツ ン ウパ ター ニシ の
OO…… ア ダ ツ カー の 高 さ (大き
さ )
A3%( )…… ア タッ カー の グラ : D…… ア タツ カー の X 座 標 増減 = に 寄 お DATA
フィ ッ フ パタ マター ン ・ T……TIME と COUNT の 調整 ・ 320 て 360 ゲー ム ス タ ヤー トド 時 の ・ 面 チ エッ フ ポ イン ト
(大 ) 設定 1 対 1 の 対決 な ん だ けど ボー
E1%( )…… 敵 の グラ フィ ッ ク ・ XY……: 敵 の 座標 370-380 _ COUNT(TIME 使 ・ ナス ガザ な い の で 、 ボ ー ナ スキ ヤ
0 ター ラク MV Z…… 敵 の 高 さ (大 き さ ざ ) 用 ) ラフ を 出現 させ て も いい ね 。
E2%( )…… 敵 の グラ フィ ッ ク ・,F…… 敵 の XX,Y 座 標 の 増減 390-400 _ BACK GROUNUD 自分 の 機 数 は 330 行 の A の 値
パター ン ( 中 ) G…… 敵 の 高 さ (大 き さ ) の 増減 SOUND な の で 、 ご これ を 大 きぐ し た り 、
E3%( )… 敵 の グラ フィ ッ ツ ・|…… ス コア の 増加 分 410 星 の 座標 370 行 の IF240- TIME と 380 行
パ バター シン ) 田 プ ロブ ラム の 説明 420 一 470 敵 の 移動 と 表示 の 240- TIME- 「 の 240 の 値 を
926( on クラ ノイ ウン ター 10- 70 REM 文 470-540 アタ ツ カ ー の 移動 と ・ 大 きぐ すれ ば 、 長 ぐ く 遊 べ る よ 。
ン 消 去 用 80-110 初期 設定 表示 廊 バ ッ チ リ 賞 。
ii
タ 6
W
WW
ここ は キミ の 足 の 裏 の 一 部 を 虫 メガ
て 見 だ も の 。 ラ フラ ンタ ラ 動 いし て いる エ
イリ アン は も っ ちろ ん 水虫 南 。 そ れ も
突然 変異 の 怪物 貢 で 、 な ん と 薬 を ぬる
キミ の 指 に か みつ いて くる の だ 。 こ の
放し に が の つかれ が いさ うう まく さけ
て 、 征 の 提 の 80 欠 以上 に 楽 を ね っ て ほ
し い 。 移動 は カー ソル ・ キ ー。 水虫 の
怪物 に つか まっ た ら ゲ ー ム オー バー だ 。
.fRoHS
: と 人
に
ドス
oc ぶ へ と
- 信 角 行 江 湯
CdrStt ト ー さ SS
SS は りり 翌 全 間 妥 語 店 。yr さ は St
が 苦い せ @ の 策 IH で U の 加治 \ さ せこ
て od
fi 石上 凍 (He ご へ 押さ Sm) つ
中 きす へ 2 の 穴 計 判 隊 。 と w は へ へ ひ 評
と さき ーー ト て 対人 な SS 民 疫 壮
0
も
つ
在
く
れ
0
> ァ
ヤ
mWWWWWWW
バッ ク の サウ ンド は
ぬれ ば ぬる ほど 音程 が
高く な り 、 な ん だ か 興
次 し て し まう ぞ 。
80 多 以上 ぬっ た だ たら 1
ラウ ワン トク リア 。 次 の
ラウ ンド に 行く の だ け
れ ど と ど 、 水 虫 の 動き も だ
ん だ ん は や く 、 星 し く
だ の を で る の だ 。 サジ
レイ は | s| キ ー が だ 。
問 員
1 二 リ 円
で 上 コ
r+
ゅ
*em どど ロ 中 自
・ 区 コマ ーーー トウ テッ は ロ *=
し
ーー
ゴ C 隔 On ロ T す em OO
目 コロ 日 コロ ユエ ユ マ
= 人 目 |
中 中 ロー = ニー ユー に ニ p ビ (中 コピ
+ 員 日
ュー 二 ロ ー」
TH エコ トコ ョ ョ トー
1 トコ ーー kTkmlb コ IT 四 還 lk
ーー キ
コー
上
Me
日 <
* キ ロイ lmm Lamm- ト ロ
1 キキ ュ ゴ ー ト ュ ゴ ニコ ニコ ーー 還 全
- て ーー
コキ トコ II "=
r
う
ロ
3
トー ニー サト ーー トー
性 ロ トロ ラロ 上 に - 記 応
へ FTGCHG ロ 上品 凸 コ
較 Q ロ 1 コ
* を ーー 帳
thLH ロ ss
テテ ェ オ エー オニ ーー デコ ロ
コ MO つ On デン Q0O00n 上 ご 中 に そ テ = は
Hm ロロ い デ ピ -C ト ュー 所 ロー ニー ニー テー =
1 コー
um LT PT こ
ーママ で mm コ 中 コー レー
ka ニ こ ロ ニーFir 電王 と 1
トコ コ =
ut よさ ュ 。 Lu 「T」
さき 相 = 一 ーー エーコ 日
中 て Uli==
1 リ
ロロ し に
NNW
ma 1 か IP・
ロマ "mL は マー ーー デーUh ニ ーーー" ネー コロ ビ + 中
1 HI ロコ の Q 串
て て = 叫 ロ ーー ビー
Te 避 コロ デハ 1 ーーmm CH は は ュ て
・ て ロ 二 へ 日 "TH ー て
mumF て Km = で 考
中 コロ ビー トー ""
Qi ブイ ビー ホオ キキ デビ デビ ロイ スロ ピ トコ 中 は
さこ ーー ここ に ルー ms
ロ へ 「TTO ロロ そ そつ コ ==
CO
も キー ==
の
水虫 菌 の 移動
筐 り 終 わ つ だ か
プー バツ
コ ゴア の 表示
・ 遼 チェ ッ フ ポイ ント
・ ゲー ム 自 体 は それ ほど 目新し
・ いも の で は な い の だ けれ ども 、
画 変 数 リス ト ・ 還 プロ プラ ム の 説明
S…… ス コア ・ 10- 40 初期 設定 ・110
M…… 面 数 50-- 60 画面 表示 ・120
N…… 塗 つた 量 70 キー 入力 ・130
XY…… 座 標 80 変数 の 設定 と 音 出
| eee 雑用 有
VX.VY……: こ れ か ら 進 お 方向 ・ 90 塗 つて ある か を 変数
RR…… こ れ か ら 進 む 方向 に ある ・ で 判断
や セラ タ クタ ・100 水虫 菌 に あめ だ つ だ か
: この ひだ すら 上 昇 する 効果 音 に 、 :
全 二 0 へ ゴブ ゴロ オビ 交 の = ご ー 思 呈 =eCH
中 ビデ キロ ゴロ エロ ロー トー
LTF も Tv 叩 か ビー トー ツア デコ am um
に ブイ /
(バブ // コ ゴメ / コ
水中 出 だ ぞ 、 水 中 出 だ ぞ 、
コワ イ ゾ 、 イ ツ ヒ ッ ヒ ッ ツー( ご
の CM ソン グ 知 っ て る ?)
ーー 貞 | 』
ロ 選 攻 中 ユイ ロサ ゴロ 凸 -ーー = =
II コ で 中 子 届 で = ーー
司 ゼ ご ジコ 中 = キト ) = コ
ー コ は
ITIIT よー …m ロ ロロ IT デ 1 ト ビジ 二 =
呈 mm 品 二 ヨ まゆ
mn ロー ーー 二 ロ 疹 0 *
mi LT
ロ イー
・ な ぜ が 興奮 し て し まう の だ 。 そ
・ れ に この 4 匹 の 水虫 の ウヨ ウヨ
・ と し だ 動き ザ 、 そ れつ ぽこ て い
sb
・ 水虫 が 4 匹 で は ムズ イ と いう
・ 人 は 、30 行 と 140 行 の 頭 に ある fO
・ F |= 14tO4: て の 4 を 、 づ に すれ
・ ば 3 匹 、 つ の に すれ ば 2 匹 と 減り
ます ぞ 。 娘 バッ チリ 賞 。
タ Z
ほのぼの メル ヘン ダッ ツチ 。
あん まり ほのぼの し ちゃ つて
ボー ル に あ だ つ ちゃ いそ う 。
SN 9 て 人 KR |
0 玉
ミ 々 障 分 。
| っ うつ 138 36 っ)
玉 ーー ン | o *O
3 大 や GS
ぶつ つゆ 人 ヘ
0 100 は
人 、 RE 2.
2
7
ル を すり ぬけ る な
の 度 /*
だ さよ
マー ( レ
本 て 見
0 みろ 読ん だ 絵
を 、 グ ラス ホッ
小さ きい
2
男 敢
そう
こと が ある の て 、
を お それ ず !
さ ッ
レン 人
も あっ て
の な か
風 朱
ド
ーーー
(
ン ビ ピョン ジン 殿村 る メル ペ
ム
層 過
マ ざ
ゝ ぅ
タ ) ヵ
2
ー フ 。
と た だ てい
ド
結構 スピ
O
ググ 7 の
9
次 し い
ば 今 は も う 秋 。 バ
気 び も 悪く な い 。
え 【
ッ ダ
い
O
ぞ
カ
さ
朋
に
15 に クニ ゲス
ら
ぅ
右 カ
O
ッ ダ
を
N
* す の は ゥ
重 有 カ
っ て くる キャ ノ
と の キー で よ け な が ら
と ん で い
ざ
ぅ
や
や
-w
キ
や
Z4\
ゝ ぅ
3
い
O
っ テー し
vs ノ
や や まそ に < 凸
lr 生じ rr 上 し + ャ の 三 中 で
届 GIn mn s 還 OS nn ーー mm ビ 王 中 中
1 呈 コ エ 「F- 0 m= DDmDO ロ mk 中 日
raGO nm rd 本 ロー トド の です トー ーー ニー デー
m 届 krOO トト ちや に = LT に … ニー 士 凸 で ュー 中
に や mm サコ ビニ トー eS 区 補 昌 ニー、 on]
Om。 テー ロコ 三 ょ = ロス mmwn 。 FCT こ
テー ロロ re に mmm イエ ーー ロロ ピー 届 の ーー と 避
sasas ロロ 十 mu 本 ロー ご ー 三 応 | や の ロロ 本
= らら ロー ロロ ロー ョ ニーロ デー に m ビ Un ロニー 時 > hm ドー]
軸 =ー Oc の コロ ロロ そ ロ ビビ の ロー ーー テー ロロ
= SLI Amman | aarmaiTrTd 昌一 ヒト コト F4F4 an TS PT
エ 「 に 呈す ID 上 ID ビオ デビ =mrl…= の ロロ ー ロ
smarmanr 一 そ ー「 に ーー ロロ ーー エー ーー
エニ mntCiOmーemrmd ニモ ニ ロ 1 思 必 の rsil『
HDLL ロ ラコ キロ ュー デュ crouD 中 デー Ln Wnn)
ょ QGc5ー OO Um テー ロー 昌 定 二 呈 CC ロニ ーー ー ど で
ユエ やす rm ーー サー ma UIOAI ロ ロー サー lm ロロ rd
に In エーIPC や こそ IT まこ II
一 ヽ 、4 中 ーー ma dhF つ 4 ビ ma mn ここ デス 、 mm 年 - 丁 守
IO エ m つ md ち ー mm 上 司 エー ーー ニー ツー ャ 日 四
ーー 守ら me mmem 守 ーー ビラ て mm CO
こ 「- こ と ロ ※ ロ ュ ロー ンー ニー デオ † Tr Usa nm CMFOー
ュー ニー se 届 人 aa Ca に ビー に こ m ョ ーー トコ ーー に ロ 十 ・ 寸
ーー Umssm に CrTdms 本 nm 昌三 っ ロロ ロロ ーー ビー
ト IO 必 コ トト CHm HG "キキ ミニ ーー7mm 日 ・ 可
ご" 還 凸 還 旧 三 ーー ビューー ニ ーー ロッ ーー 避 全 の 二
ma re ロー mm ほ ロ レデ テロ ma コ ロー Hm r 士 十 て rk
ぃ セー ラ m な つつ 口 選 本 ma 区 に に ーー エー FILE LE 征 ロ ー
… エ IOGO ロー 1 日 Unorsmrmd mr 邊 口 軸 に エ
ド Um LO ロ m テ ーー に に マー イロ ローーーー ーー L ロ ーー デー 中
* ア コロ 「 こ 中 mmasma lma 土 中 キー ニー ロー ニテ ニテ ma ma ii Hi
っ mUF aa aa ゴト トー デー "mm 時 IF] LI
ーー で PIES 1 に で に ーー LIUT ET で
だ と に nm に そそ Llhn ono mr Fa PF HITー 皿
ma ロニ コロ テー ニーロ ma レロ IFTmT LE ーー にし ロ
トコ サーー ロ ュー キョ ーー セロ TE す 昌 ー ト ーー し 晴 m
nr 本 胃 TL
ロサ sa Un コロ 定員 LTIEITー TE ロ エロ イデー マー ョ ョ ィ ー 日
4 一 AH トー て QN 赴 下 じ " で 6
| = & 韻 人 天 GL 吉昭 ご 人 |
| で や ぐし" 寅 球 也 C し きっ 6 セレ く ーー
| 染 へ H へ ーー-
| Q 叫 で 記
| 固 " 地下 lp
| ン ベ ~ (
| へ SS で せ @ へ 蔵人 生 らし))
Gees 三 娠 つっ う 昭 NIRNTPND
し ガ し 、 ご の 音 は ちよ つと …
も つと ウキ ウキ する よう お 音 (
し て ほし か が つ だ 。
つ
て 一
それ と 、 "STAR Y ド だ
と いう の が 表示 され つば な し と
田 プロ ブラ ハム の 説明
変数 リス ト
の の オー リト リー 利 理
弄 チ ェ ッ フ ボ イン ト
12
キッ フタ
巳
配列 宣
定義
1
…… 英 座標 ご 加
()
W
),
(
2
),
(
X
速度 (増分 )
込み 用
で ら ガ か い ポ ボー ル ガ ボ ポリ ワー ン ボ
ワー ン と 見 事 に は げん で ます ね 。
スプ ライ トド 定義
2
3
読み
面 表示
スタ ー ト 時 台 変 数 初期
設定 ・ ス ター ト 興 理
キー 入力 ・ 処 理
画
…FOR>NEX「 用
画面 表示
XX,Y,W…… 自 分 の 座標 と 加速
|
画面 が も
リ 賞 。
いう の が 簡 ・ いう の は 、 せ つか ガ かぐ の
の
単に で き で し まう ん だ みか ら で
ーッ
て
本 当 に M ら つて
4-6
計算 用
0 ロ
支 バ ッ チ
O
な い
い
だ
・ つ
画面 も 十分 美しい
スゴ イ な あ 。
(
/
度 (増分 )
・ キ ー 入 力 用
) し 。
(の
6 一 10 瑞 移動
タダ
WWWWW W
い
WW
遊び 方
上 か ら は 敵 の 戦闘 機 、 下 か ら は 敵 の
洪水 角 ……。 ま ん な か て 孤 還 奮闘 する
の が 、 キ ミ の あや つる 戦艦 だ 。
中 EE キー で 右 に 左 に 敵 の 攻撃 を か わ
し な が ら 、 [CTRL] ( 敵 戦 闘 機 用 ミサ イ
2)′ や ( 敵 潜 水 逢 用 ミサ イル )
こむ
て エ
〆
トッ
( (w 深 同 SH 弟 て 詩 送
衝 ぼ ev9tamS 水 。 持 ご て > 祝 ぶ の 名
まい
o:
str のど AJ 革 中 で
ANV ん NN ローMSASG 革 |
Ok は 滴下 薄 性 ささ (させ とき
9+
導 失 GS
1 PFint
"1 さ で リョ ロニ 1
補導 ロロ F よー て
選 品 t ヨロ ミリ h 和紀 昌
さ 旭 中 at ョ ロロ 昌 加 1 昌 昌 昌
昌 昌 日 け 昌 昌 四 昌 昌 器 昌 昌 昌
II5ICICI2I2IDI2ICI2I
て 戦っ て くれ 。
瑞 戦 闘 機 を 1 機 撃ち
落と すご と に 100 点 、 敵
洪水 艦 は 1 機 ご と に 20
0 点 だ 。
敵 潜 水 艦 を 4 機 破壊
すれ ば 1 面 ク リア で ボ
ーー ナス が も ら え る 。 ポポ
ー ナ ス は 500 点 メ クリ
数 だ 。 ク グリ デア し て い
く ご と に 難し て な り 、
8 面 て 難し る は 最高 潮
に が の て くる を ぞ 。
1 万 点 を 越え る と 、
戦艦 1 機 が ゲ プレ ゼン ト
され る 。 戦艦 が 3 機 ( ま
だ は 4 機 ) や られ て し
まっ だ た だら 、 ゲ ー ム オー
バー。 ゲ ー ム を は じ め
る は 、 リ ター ン * キ
ー を お そう 。
キミ は 何 面 まで 戦い
ぬけ る か カ 7
"上 時 e ま 還 " : mag
すす で †。 ビ 日 日
っ 昌 HH ョ ta は 8 に アキ キキ † 昌 ささ アロ a。 昌
け 旨 は 日 昌 昌 昌 困 昌 避 昌 昌 昌
ら 四 ョ t【 ョ 昌 昌 昌 昌 日 昌 内 昌 昌 昌 ロロ 昌 昌
昌 昌 昌 昌 昌 昌 昌 昌 日内 則 昌 昌 ロロ
WW
X
と
と こと へ
し の の の の ペン シン
ペン ン シ と ン 100 ス の
ンー に
2 か 2
ン 22
に )
ンー ンス)
ンジ ン ン シン ピン ンス
の の バン
ジン
5
アン ツン ペペ ペペ ツン いこ ムペ っ バー メン ン ン ーー ンー ンー ペー に
トレ ンス ペペ シン と いら
ンー ニン ンー
と に
9320
の 3
で ンス
の ? と
0 タン ン ン ンー トー シバ ンス ハン ンー っ ペン この
の ペン シン ペペ ンー
% )
ジンジン ws7。94v
<
ド う 3
Co と S
に スン ンス ペン っ
4 の と 9
ン つの 420 の の ン ン ペ ン ン 6
トン ニン ンジ シン と 2 2
Co て 04 つと ジス ン と < と
ジー ピジン ピ レン ン ピン ウン シン 9962 1 ン ン る
ペン ンー ペー ペー バーン: % る
とう S 2 5
2 2 ンジ
> ら ン ? 3
A ム ドカ ー ン / 敵 の 戦闘 機 を や つつ けた と ころ 。
ミ
ポ
XX
YAS
4 潜水 艇 1 つや り 了 イ 。 お つ 、 も 1 つ あ た り そ う 。
中 占 四 日 昌 中 日 昌 さ 昌 中 すす に 昌 昌 すす すら
回 』 ビ
ー ミ ング ") ド ラゴン スレ イヤ ー の 日 本 ファ ルコ ム ( 谷 0425-27-4121) 〇 PC-8801.mk II(FM- 7 用 も 近日 発売 予定 ) つ テ ー プ \4.800、
バッ 。 ッ ん / 5 イン チ デ ィ ス ク 7.200 @ コ ユニ ー フ キヤ ラ 続 々 登場 の アフ ショ ン ゲ ー ム ロール プレ イン グ ゲ ー ム 。 タツ
〇
NNIN3 SRD
の
の
へ 人 石 S 民 共 S へ 潮 蛋 mmm AO へ ぶ こ eSF el9tl9t し 年 dm 避 一
BATTLE SHIP リ スト 続き
旨 中 ョ t コロ 昌 昌 昌 日 中 1 日 昌 昌 昌 時: 日 日 時 昌 昌 昌 昌 細則 同 還 回 革 回 四 日 。
日 旨 昌 昌 昌 旨 昌 昌 昌 名 販 昌 昌 昌
は 中 ョ 【t ョ 時 連 回 1 回 昌 困 果 還 昌 旨 昌 昌 昌 。 日 昌 昌 昌 晶 財 還 財 回 回 加 回 由 回 由 日 。
828282ICI2I2I2I2I2ISIDI7ID
は d ョ も キョ 1 時
時 昌 昌 財 昌 昌 昌 昌 昌 昌 昌 内 日
1 けり d ョ † ト ョ ロミ 中 困 で で 時
千曲 昌 昌 昌 日 昌 昌 回 時 昌 回 昌 昌
119
† ロ ゴキ † キ †† 己 キオ に ニ † 唱 † 昌 5 日
1 エロ
†† ら デビ ニキ オロ アビ ヒラ は 1 昌 昌 日
13 日 ニ 3 ゼ ミキ ロ F ミニ 時 も
は 。 マ
1 中 四 ミニ ロロ は ミ こ ロ 1
[ ュ 。 叶 ロロ ミキ
っ コ 旭 ミ こ ロゴ ヨロ 。 1 記 I ミ に
1 は 加 † ロ F ニ 昌 本 、 の 記 導
ロ F 入 E。kF デ ョ ヒロ 10F 人
1 ヨ 昌 も 、 だ M び 豆 ども る き
コピ 昌 民 上 回 回 避 昌 時 日"
で 則り 1 らら M 四 ょ で ょ うさ 1 ょ ロ s
己 け 全て 結 >。 の と ルル も まで て きる
ジュ よ 問 Dr エ QN も 上 で CUF き ロロ F て る
ジジ 人 すず ロロ F サーラ も ロロ ユダ
5 こ ODlnF 上 :&HIne
和 T を
胡 @ 抽 ら
=
ま 洒 も
$ 洒 も
1nt
it
nt
1nt
3 人 <
が
ヒュ
に オ ト ュ トト KFED 一 』 Tr ET た に すす 1 ロト 上 うー
Cr 間 3 E に 0 Eo IO に kn に EC に に 1
[中 |
ニ ロ レビ ミロ PF
FHNELTEHN
すす
。 E し
" 1
に し 上 す 上 すす に す よ に オロ ヒー オ Fa F ト Fa F コ トコ トド.
げ ュ =
に 人 よ 有 も 前 1 ミミ 1
放 ョ = EE 訪 HI
う 旨 FFP1R も も コ D も アリ 氏
H 民 MN EE 和 T 日 STHRT『
さき ロロ 日 ニ 如 し ニ ビ ミュ ピロ ニ 1 ミ 民 =
う 3 ヨコ 如 1†1 1HEK ら BUT 回 3S く は
中 曲 四 ヨロ ミニ ロロ 回 回 まき ミキ ロビ
+ ロ ュ FTHHKGB ロ ュ オ ヨロ 5H ら Bkt
11 ロ ロロ ロコ ュ ョ 9 "上 21 四 こと
け は ヨロ ミロ で デ 還 き
は で 記 ニ 1 で 時 日 ニ 1
中 る 日 日 ニュ ロ ド ら ロロ ドミ に ニュ
= ニラ ロロ) で で さき 如 ゅ 上 ロ 避
和則 1 ロビ に で も キロ 語 : H
Il
kTI ーー
FI KFE PL ET コー
1ー】 sy mn ET TO 本 CH EL オト LO FFP 上 テ ョ
ロ ココ 握 1 つ
叶 呈 四 す ロ F エニ ピロ も ミロ に 1
1 上 ロ 四 ht ま F ニ ヒロ 1 ロロ こと ミコ
31† 日 マテ ミー1 th ら Eh 9 ロ
中 で 名 ヒ ニ ヒロ 1 に (。 1 還 。
中 加 1† 1 ヨコ は th=n ヨ
も ロ すう 3B
キキ コロ 1 で ミ キョ トリ ミド 回 > ニ 昌
ミ 1 ら =P 1。1Emm ロ リロ 昌 王
品名 名 1† す ミュ ミキコ ヨ セロ リロ ミド 1) 三里
= う in 1 = も teP 1。 昌 >
5 ら 1 如 f ロ F DD ミニ 2 トロ コミ i ュ
キュ すす ロ ュ FT ロキ コロ ュ ら
コロ マロ ngzt sf キロ F じ =11
3- キ て ヤル 上 て 5 うそ で う 革 も セ 有 h ら h
2 の
FrFrint 「' 軒 還
Friht ' 軸 軒 還 h
Frint " 年 是 還
PFint ' 軒 還 の 回
コマ つつ K
っ さ ど フラ
較
人
ま 証
1 た
本 学 さす
ミト t ト ら P
F 昌 。 評 中
まま 組ま
-』 | I
*
† ョ 3
三 昌 ロ
に
II
ニキ
1f じ =
thEr
† = ミキ t ョ
3 ミキ
ミニ Hhb らら
32 if
上 ロ 中
%。 畔 江 下 と る
ニ Pー1 。 如
FE
【 ロ 人
ロロ 【 ロ
4 。 2
ビー
ーー
FT1 は
中 TFT 本 | 日 !
1 |
CE ーー. II 上
エエ ms
! ロ
に テ
-F。 本
= キロ す ロロ
ー イ に イイ ww
| に す
d ョ at キョ BB183ddbhd デ キキ キキ hh ュ † す ゴキ すす どこ き ロ
r 唱
ヒエ
『~
|
本 "
画 "
まま
財
も ロ
紀
3 ロコ
>
H
ミロ
陣
U f
に
キ
ト
っ
史
d ョ t コ け 昌 昌 財 則 昌和 すさ キマ キキ キキ キュ デキ 回 さき 寺 ]1 填 紀 加 1 回 。 昌 1
1
』 記 」
5 に 和 得 あの
=s† ロ F 上 ニコ キロ 1 区
ロゴ まほ ュ 1 まま ミ こ ロ 1 5
[。 日 ほ ミ ヒロ 1 ほ ェ ロ
を DB。 人 よ
1 ロー 上 。 衣 上 18n ら t
お も 洛
F-1 !
-TI
LT
選 WSh も も
ニコ 間 | 計 ゃ 記 ゃ 較 4 1 ゃ で H ビ
< RUHHHEH し 上
3 5 ロ 1
は 中 ロロ ヨド ロロ ヨコ 。 ド
に SR ホ ま 衝 Y ま ギ 人
に に に
さ コ 加 ミニ PFFih
選 生 上 よ ぁ ま 泊 信人 の ) 半 全
こけ ロ ヒ ロロ ヒロ に ロキ に キキ
コロ ミロ b は 8
日 モロ 中 3 王 滞 さよ ロ ュ キロ
hn ヨロ ミリ ロロ コロ デ 加 =
抽 、< 呈 ど 栓 を 党 革 旨 王 、 記 爺
3 三 還 トロ らら h-・ トコ ヨ ミロ
he ヨロ ミロ bh 1 日
1 than 93 ロ も モロ 5
ミ ら = ロロ は ヨロ ミリ ロロ
HI
邊 - 抽 品 は
まき 3 です WR3
5
1
つ
2 っ
ョ 1 14 す 23134 中 14
lk]
に に
ニ う 5sinEt sjJ ロ 1nt 1
トー1
1 ミニ ロ ロ 上 ょ で ミミ こ ロ 1
1iHE※t
HH ニア BETH Et
5 こ ロ 10F ご う コ : 計 中 どす に
HE ロー5 ビ HHRE 昌 1 日 昌 回
Ne
… う 3
昌
トー1
2I2I2I2I2ISI2I2IDICICI2IDIDI2E 拓 5
IDI2I2ICIDI2I28CIDI2ICI2I2I2 ま 演 25
昌
の すす 5 1 |
< ドー ます コ ロト 坦 引
そ < 5 の ・ Pa | 5
[ニニ 1 で ロロ も ロ 中 は = も PF
て ーー < og
* り 1 ら ロリ ちら ょ ロロ ュ ピコ ょ 15
< * ・ Cd と 】
宇和 も 他 生 も ロコ で うら DF 所 DP と 4
に 四 三 : 記 ae で イロ |
fh 5 ら HIFI > し 1 ほし
ここ 0 …: ご H 「 導 二 っ me ロビ エイ
互 だ て 中 。 デ ジコ う US 尽
HH 栖 】 計
ト 時
R NN
上) よ 、 信 渦 だ 肌 六 史生)
ーー H ーー |
1 日 量り ミミ ヨ ロミ ロロ は は ま ヨ ロミ
an ポニ KRー ミ =1== if
ミニ ビ 1† に = 中 thgmn 引
叶
中
回
で さき 回 ょ で 回 。 で ロロ ュ ど ロロ <
の 選 も
も すう よ で ちゃ コト ロラ KbD ニ = 叶う)
ト う
うさ 日
・ ド に
コ 和 nt
ココ
) キ 5 ュ >
うら 昌
10 ロ と DD も t ロ ミ PFiLta(K,。1)。= ラ PF 上 ItG(K。 ロ ) う 83mm ロ ue D in D-ー4 も tO すさ 。4 す 5
ミュ if = も t ョ t エ US8 ミ (1)= ロ then 30t
1fCsPFite( さ 』。1) く ぐう CstatU5(6) =)t
に
F 己 上
1†1 = トコ ョ トロ 5 ミ (1 は ニニ
も =P ー
FLuFT
す
|
|
= り
1
トー・
し
中 !
『
Frー
に コ |
!
まつ ・
コ
+ー ト
ーー
< 1
ーー
3 ーー』
ぃ DF
IM 症 lo
品
回
回
還 1† ミキ ト ョ トロ ミミ 113 = th PF キヨ 9 ヨ ェ ュ ょ 。 リ に リ ミ 1 ロ ヒビ ピロ キロ 記 ょ コロ 邊 IEI 拓 ロリ ロ ほ は in 1
1 tt ロ 人 1B 邊 。Z
名 FEtuFF
51 回 HH すす 18 1 ロニ は は 上 トロ ラミ FF1t ら (うさ う ょ 1 は ょ ミニ ミ FF1 も ル ら リコ ュ ) ミ ロビ ヨミ ピロ うさ う ょ コミ ヨロ ミロ リロ
ら 和 1 り 590=UD は 3i ら gra5B 148F ョ = も uF
らら で =H 二 5 は ロ = ミ PF1t=『H. 1)」 ミ PF1t 上 ロロ 2 1JFH ニ 1 ま ミ ら ヒビ ョ ミ ら 日 :』 ヨ
に |
|
に
CT
m+
本 『 コ
1
LT 本 に ロロ 『「 コ トー と どー 品
キー トー F す ー 昌
LE 朋 !
中 ミロ F コ ミロ
ら 5. 人 三陸 や もり まう 作 き he=h ヨロ トロ は ロ 由 四 ミ ら ヨロ ミロ bb ロコ IFEtHFF
巳 叶 四 リロ H 上 t ロキ キミ 大 ロロ ロビ ロキ †
ら コ ロコ =9 さ ょ ら ュ 1 コロ ij=]1=eP 11.1』 ロ ニ 15 ミ f ロ F = ニ 15 も ロ 13 =t も =Pー1』=9 さ ュ 』 邊 。 理
5 ミニ | ほら ヒロ PD ロ ュ 1 ミロ ニ ロ デビ IE ロ HEEt IE ミコ さき ュ ュ 昌
ロロ ヨロ ミロ bh 1 ヨロ ミロ HH は BaFEt 上 UHFH
ら ど 四 ら ゅ ロ E ロ ht ロキ キミ ロビ ヨミ ピロ で ュ ロ ュ ヨ 。 1 日 11 1 ビュ まさ
ロ 避 ロビ ーー 15 キロ 記 ょ ロキ 8 ミニ 9 うさ ょ ら ロ ェ 15 ま ミキ ほら ョ PF 1 ま 1 ょ 。1E1 ロ に 1 中 上 ロロ 滞 ュ コロ 中 キロ F
ニ 1 コ モロ 四 ミキ ロロ ピロー1 ミ ミミ 9 ほう ュ 中 8 ミロ BDP まま 1。 まま 和己 ト
ロコ ほ = ビ ョ ヨミ ほら 1 すす.15 コ ロミ ヒ ニレ ー1 ま ミュ 1 し ドニ 上 HEH PF1HL ここ ロビ ミ ロロ FE ロ ュ マデ ささ 日 日 所 まで し ュ
* コロ ミロ ロロ 回 回 は ミニ ロロ PD ご Ed ロミ SHUD ヨロ 回 ら ゅ ロロ エー ロ HEd ロ も キロ 時 デビ
回 如 PF1H も t ここ ロビ ミロ FTE1 は は 11) 9 ロロ 日 計 E は 中 所 民 "
1 FP キ ョ ヨロ ュ リ は ロロ ヨコ ョ ョ hh コ ョ 9F ロ dh ココ ョ ヨ オ F ロ ビリ E は ロミ ロロ で 回
で で 回 = ミ ビ ヨミ ほら ミ ヨ ロ ミロ で は 旭 IPF1IHt こ リ ドミ ロビ ド で 中 。 1) 時 回 回 林 リ ミヒロ ビビ ミロ ドド トロ ュ デ うさ は で
3 ヒロ ビニ ミロ FC1 コ で うう "91030 弓 病 "「 コロ Lt ロ さき 8 日
さき PF1 ヨ 9 ー ドリ ニキ ロキ ピロ キオ こ に ロ に は リョ ロニ エミ Ft 上 ロ FTH
rd ロ P ョ 9 ロー) ヨロ で リミニ 3 ミミ Ft トロ FF
コロ DP キョ 9 リロ ニーロ ヒロ ロー ロビ に ロ リョ 昌三 中 ミド ロト エロ FH
デ ロ 加 F キ 1 ョ ヨ 9 リキ ゴビ F リ ミロ まま ミ FE キロ FH
で 加 キロ = キロ EJCE) う ニ 昌 II ら mt ミ 則 三 旬 ミ は F ニ トロ FRH
デ B 加 1† す P1 ヨ 9 t 上 haBHh ヨロ 上 t ロ どど B 時 ら ]1= ミ ほら Ft ロロ FTF に
1 1 さま に ほ ミ FIu1i 選 MsFE 上 ロロ FH O]
日 共 け PF1n も こ UT 王 OPC1E。11) "REHD ザ は ロビ で トロ 1 ゼ 。 コ 中 に F ョ も トロ FH |
コロ 1 四 PFiIHt ロビ ミロ FT 記 中 まう 3F1dhHt ま で リ 回 還 リ キオ ロロ 所 まま 日 3 ょ ュ すう 8 エキ 日 時 than 日 =
HINPFIHt こ リ ロビ ミロ 511 ょ 13F1d ヨ ht まで り 還 還 りす 后 ロ 所 まま 『 日 3 よう
に
っ 因り ロロ ロ HE ら Ep ロ ら ht コロ HIF ら EtU ロ FR
旨 和 中 加 ヨロ ミロ h で 己 昌 1 ロニ ョ トロ 11,。1 昌 imPF EiH も CO1 で ュ オ ュ ュ リーー ツ ーーーー つ コ |e@E HH
HH 5 5 ら 昌 時 *# トーーーーーーーーー | ii PFEint に と に ロ FE ミロ FE1 デ 。 1EMIF
は コロ PF1 コ 9 リト 2 呈す † す 1 ロ 和 † こ ニョ ョ ヨロ ョ ロ ョ イコ ヨロ ら ヒ に ロロ ヒロ ヒロ コロ ョ ロロ エニ † す は 1 ロキ マロ ロリ ミニ N+ ら
キビ
は ロ 回 了 ピ ビー1 1 忌 三 四 th ロ 民 = ニ 1: ニニ ミー1』1 す ニニ 1 も ロー ニコニ
ら ど は ヨロ ミニ HbD で 日 ま ミミ | ほ ロロ P 1 ミコ ヨロ ミロ hh 昌 1 加 ピ ビニ ロ + オ 1EPFiHt に ロビ ミロ FT1 ロ ュ デ うさ 3』F1 ヨ
ます 引 和 キキ 用 NN ま や う 。 コツ ヨロ ミロ で は 四 ミ ら ビ ョ ミニ ら ドコロ トミ エロ 邊 昌 昌
ご ロ 則 ヨコ 3 て 日 thh PE キョ コロ ょ "に さ ロ
= }
E,F,H…… 衝 突 判定 用
び ( )…… 潜 水 艦 使用 判定 用
し ……SHIP の 残り
M……: 潜 水 艦 の 爆発 回 数
P…… ラ ウン ド 数
O……BGM ル ー チ ンコ ー ル 用
R…… ミ サイ ル の スピ ー ド
S…… ミ サイ ル の 発射 率
X……SHIP の X 座 標
遼 プ ロブ ラム の 説明
〇 > へ パイ スコ ョ ア ・
10
初期 設定 1
510
20-160 キャ ヤラ ンタ 定義
190-210 ゲー ム 画 面 作成
220 キャ ヤラ クタ 定義 ・
230-370 タイ トル 画面 作成 ・
380 初期 設定
390 キー 入力 判定
400-410 スタ ー ト -
420 初期 設定
430-440 キー 入力 判定 -
450 敵 ミ サイ ル 消 去 :
460-470 スプ ライ ト 衝 突 判定 ・
480 ・
490
500 ・
BGM ル ー チ ンコ ー ル
雲 移動
英機 移動
潜水 艦 秘 動
520-560
570 一 600
610 一 660
670 一 690
700 一 /20
730 一 760
770 一 630
640 一 870
660-690
敵 ミ サイ ル 移 動
ミサ イル 秘 動
英機 、 潜 水 艦 爆 発
SHI 爆発
プー ム オ ー/ に 処理
BGM
ジジ ン ルーン 圧
2 プス
ら SHIP を 1 隻 増やす
田 チ ェ ッ クボ イン ト
ご の ま の ゲー ハム は むか し か ら
あつ だ けど ご 、 こ の M5 の 「 BATT
LESHIP」 は 動き 8 が な め ら か で
速い 。BGM、 効果 音 も ちゃ ん こと
付い て いる 。 そ し て 画面 が きれ
い だ 。 気 に な つっ だ こと と いえ ば 、
慰 雷 が 海面 上 に まで 飛び 出す こ
と ぐら い 。( あ つ 、 ミサ イル だ か
らい い の か な ぐ )
それ と 、 面 が 進む びに つれ て も
つと 敵 の 攻撃 が いや らし こなつ
だ ほう が いい と 思う の だ が ……。
で も 、 い いい 出 来 だ |!
高 得 点 を 上 げ る に は 、 港 水 艦
を 1 隻 だ け 残 し て 、 敵 飛行 機 を
ひだ すら 革 ち 落と す の だ 。 娘 サ
イコ ユー 賞 /
レル /
mWWWWWWW
勝負 する わけ 。 [1| で グー の ミサ イル 、
陽水 ョ キ の ミサ イル 、 民 IC パ ー の ミ
サイ ル 発 射 。 敵 は ラン ダム
* ヾ に 形 を 変え 、 色 を 変え る の
遊び 方 あき の いそ を 。 。
うう む 、 な ん と な く 不 気味 な スペ ー パー の ミサ イル て 勝つ と ・ 競
スゲ ー ム じゃ 。 20 点 、 チ ョ キ は 10 点 、 グ ー ー
貼 軌 キー で ビラ ミッ ド 型 宇宙 船 を あ は 5 点 。、 だ か ら フ パー で 勝っ W ッ
や つっ て 、 画 面 上 か ら や っ て くる ジャ た ほう が 高 得点 で きる わけ 。
ン ケ ン 型 UFO を や っ つけ よう 。 も ちろ 敵 が 、 2 回 画面 の 下 まで
ん 、UFO を 迎え うつ ミサ イル も ジャン 〈 る か 、 宇 宙 船 に あたる と
ケン 型 。 ミ サイ ル と UFO で ジャ ン ケ ン ゲー ム オ ー
バー。 リフ"
レイ は | zZ 。
文 参考 「 マ
イ コン BAS
2
84.1.『The 正
十 二 面 体 』
介
ロミ エー らら に ORE
つつ 殖 S の は
- 光 ご 尋 rr Je ,. 訓 さき 圧 きき ro の さて で 科
へ で は MS
ヽ 引 4 1 涯 田 喘
座 nmo に NN ロ NS(
| SYS せり 上 9T [
eual6 』 に <
4 ジャ セン ケン ポン / 勝つ を 、 ド ツ カ ー ン /
画 変 数 リス ト ・ 10100 初期 設定 1 ・ キ ヤラ ・ 180-190 自 機 の 移動 ・ パ ッ フ : 310-330 ゲー ム オ ー バ ー 処 理
X…… 自 機 の X 座 標 クタ 定 義 の 音 ・ 画 チェッ フ ボイン ト
'S…… ス コア ・ 110-115 マイ トル 表示 ・ 200-220 それ ぞ れ の 手 の ミ サ : な 、 な ん な ん だ ご れ は ー。 敵
P…… 敵 の スピ ー ド ・ 120-125 オー プ ニ ン グ イル 発射 ・ が ぐー ちょ き ば ー な ら 味 方 の 弾
G…… や つつ けた だ 回 数 ・ 130 初期 設定 2 ・ 230 一 240 敵 が 下 ま で 来る か 、 : も ぐー ちよ き ば ーー。 う お 、 ア
N…… 自 機 の 数 ・ 135 痛 景 、 自 機 の 表示 : 自分 に 当 た つ た ら ゲ : イデ ア で す な あ 、 お も し ろ い 。
A…… 敵 の キヤ ラフ タコ ー ド ・ 150 敵 の キャ ラク フタ 変 化 ・ ー ム オー バー へ ・。 ちゃ ん と BGM も 入 つ て いて
|…… 敵 の Y 座 標 ・ 155 自 機 の 色 の 変化 : 250-270 爆発 の 判断 ・ 楽し < 仕 上 つて いる な 。
し …… サ ウン ド ・ 160 敵 の 移動 ・ ス ピー ド : 280 メイ ン ル ー チ ン へ も : だ だ 自 機 が の 台 と いう の は ち
K…… キ ー 入 力 用 変化 どる ・ よ つ と 苦し い 。 増やす の は 簡単 。
HS…… ハ イス コア ・170 スコ ア ・ ハ イス コア ・ 290 敵 の 爆発 ・ 130 行 に ある :N= の 値 を 増 や
田 プ ロブ ラム の 説明 の 表示 ・ 300 自 機 の 爆発 ・ だけ さ 。 六 バッ チリ 賞 。
2
1 PF
ご 好 =
の 9
さき =
9 る 選
中 加 ミ
は 」 半 学
コ 時 =
- き 号
巳 軌 =
ロ 中 1
回 = ミ
ロ 引 3
ご ご
が 三
押 叶 還 ]
で に
すら 三
っ
' ず や "や ペ 」
に 1 CI
に TI II
に
FT 人 可
ロト ュ 上 ーー に テ kDI FEFI !
キー ト
1 トー テー に そよ に よ
上 ET 可 !
1 5 IO 『T 目 上 想 ! 下
EGG …J Th ET ET 中 オオ トコ ト .J
MO]
十 トト エー トー トー に エー に ーー に よー トー ト
か ー
に
1 LE に よー
1
1 3 可
3 昌
319
ロ 。ー コ
さっ 可
|
ト !)
Fa ト 上 Fi I
LT た 上 ー
トコ
[中]
II
計
ト ュ ト ュ トコ
・
昌
H ニ
避
iT Mi ー』
に .』 *
し トー
トー
1
了
me
つ で す
に オト た
ーー TI 1 FI
せ !
に 明和
……・
" す 。 1 ト
1 TI - キ
「 隊 」 「
生出
に |
7
中
1 王 に に
LIL
1 ト
ーー
ee
日 ロト Fl ロ
ーー。
CO
=・ 王 」
FI 一 +
|
遇 ]
KA
I
kN IF]
や ゴー トー
Lt
_!
中
~ 選
る
トコ ーー トー トー トコ ・
"キー トー ーー キー トト ーー トー トー ニー キ 。 ma ーー キト 。
LE
も 電 r、
思 深 肖 秩 層
当時
に 3・
1 中
ー ト .
で!
ーー と +
e す
けけ ば" マ
中
中
中
” 四国 汗 間 ": ma コ 3
りさ は さき dB1 エ
: ミ に ロ
s ニー ビー ロ
ロミ に
9 ギー ほす
時 "WE
に ます は
Se
1† ヨ ヨ ヨ
= th
アミ ポニ 1
' も ロー デ
RC
t
に
っ
4
し LL」
ョ ロロ
H 衣 > ・
HH 放
ミ PF1t『 中 >
1 に
FM 中
LC に 生ま
1
し に
"mm LC
ヤヤ W
が *
<
5I
Ra
LC | ! 敵 還 も
MI 上 ー
ドミ ご ロビ
thH ら =hH
= a ョ nd
ーー
Ii
に 4 『I 是
ュ 『
ーー
あい
1
も"
AHI 3
ーー
し
エコ
画 」| CI 」
に HI 上 ー 1
FI
ーー 本
萌 ]
SI です トー
IM EE CN 1 間 還 0
LL 琴 kot |
日 !
に | 旧 トー
ご !
LM 」 > 上 工 」 FI
oe 3 さ
ギー
CE
pr
キキ k ト コロ ュ
FE LT FT 村
す の w
0 還 )
II
お
>
!
トド て の 』 CE
F す FI
山 !
ト … よ
Da
LN
2
ト .)
日 上 う
上
1 (5
Pe げ *
中
IS ks すす: 柱
ーー
ぃ uu 。 mm
トー me
Mr
LM 1
ご コ !
ml
…、 下す
際
IS
『ー- よ
に
」
) 1 1 コ 9 コ 1 9 は 49HdH こ dd ニーd ョ ロイ "
ロ
に 上
に コー
1 出生
|
MC
上
Lu
FI Er
La
し 叶
ロタ
ーー
て
1
ら 局 ロ ま = ニ リー テリ
ドキ
に 上 。 に ユ
ーー
ee
の
王
に と
3
Pa]
…
ーー
|
の
こす
1! 叩
商
に
ーー ユ
uy 語 に
mn トコ ロト ュー コ
FTT 員 同
ロコ
= 5 日 ニ デビ
ーー ド
thHE=F
ょ ミミ こ ロ
中 日 ミヒロ
③: 暫
コ
| 中
本 1
HH【 ピ
11 !H
人 っ
aa 有
コ 中
[MOW 半 ]
十 !
で
革 。
日 !
0
soccs8
FI
た す
し 4
了 M 史
こう
IMW|
CI
に |
山
TT>
* 中
『 和 用 上
『T1
・1
」
墓 つ マジ カル ズ ウ ニ スト ラッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ ー( 代 0488-85-5222) PC-6001.mk II/6601 へ
800 倫 『 ミ ステ リー ハウ ス 」 と 並ぶ アド ベン チャ ヤー ゲー ム の 人 気 作 『 黄 金 の 墓 』」 の 続編 。
ロサ すす † す すす 己 す ビ
た る オ ボ ミ ミオ すす
3 ドー
に SS
中 !
宮
-ー ト
CI 」
ILU 間 較 肖 |
mg
中
トー1
8 章
mm トー ゴビ 十
DJ
上 … も
LM 】
中
トー よ 上
La
1
も
了
Lui
トト
LM
中
いす
LT
二
1 3
kW
です
LT
十
ト !
MO
十
ドキ
0
1 1
! 月
| |
Um]
! 叩
有 邊
lk
員 ]
- づ の 月 FI
中 『 康 月 は
LE
ロ ) TH
「 間 」
中
| 1 と す
動 紛 1 」
| に
LT 」 千
所 トー
oo mm ii
せ !
ーー
リ
に 朱 7
中
II
うう
W
WW
N や つつ け だ と き の
デモ も いい ね 。
サーガ ン ン ー イ
1
KW 49
(黄色 い ポ イン ト ) あたり を
照準 ( 十 ) に も っ て き て 、 ス ペ
ーー ス * 素 ーー て ビーム を 具 ち こ
ヽ ふ も う 。 ビ ー ム を 6 発 連続 撃ち
KS 遊び 方 を こ な う か 、 敵 と の 距離 が 0
リス ト が 短い ./ 動き が は や い / に な っ だ たら ゲ ー ム オー バー。
お も し ろ い ./ と 担当 の パン プ 激 賞 の
1 画面 グ ゲロ グラ ム 。
キャ ラク タ は シン プル だ けど 本 格 的
1 DEFINTA-Z:SCREEN9 ,9,9:CLS4:CLICKOFF:REPEAT OFF:WIDTH46:INIT
0 UN ーー ング の 25 BX=109:BY=109: し =9:X=155:Y=95:S=9:ST=9:H=9:POKE&HE,29.12:PRINT'+"
ー ム な の だ 39 TM=9:IF ST>289 THEN ST=289
BN 49 BX=RNDx159+59:BY=RNDx199+59:1.=9:V=INT(RNDx19)x18:LOCATE20,12:PRINT"+"
|214I6I8| キ ー を 操作 し て 、 敵 の 急所 45 FOR I=9 TO 199:PSET(RNDx639 ,RND*199,-(RND< .5)x6+1 ) : NEXT
59 IFL>159THEN179ELSEP=PEEK(8H2E) :KX=BX:KY=BY :BX=BX-(P=&H34 )*15+(P=&H36 )*15+(RND
*29-19):BY=BY-(P=&H38 )x19+(P=&H32 )x19+(RNDx19-5):PALET7 7+(RND く 5)%4
69 POKE&HE,5.8:PRINT"SC"iS,"T"16-TM、"D"i159- し :PALET1 、RNDx4+ 1
79 PRESET(KX,KY ) :POLY(KX ,KY ) ,H,9,V,9+HtH+H+H , 369+H+H+H+H
89 PSET(BX,BY,6):POLY(BX,BY ) ,L,2.V,9+L+L+L+ し ,369+ し + し + し + し : 昌 = し : し =L+ST/49+ 1
99 ON- (P<>&H29 )GOT059:LINE(9,199)-(163.199 ) ,.PSET, 4:LINE(319,199 )-(163.199 ) ,PSET ,
4:SOUND 7,&B11111191:SOUND 9.16:SOUND 12.128:SOUND 3.9:SOUND13.9:COLORW
199 FOR I=255 TO 9 STEP-19:SOUND 2.1:NEXT
119 LINE(9,199)-(163,199)-(319、199):COLOR7 :TM=TM1 1
129 IF (ABS(163-BX) く <L/15)x(ABS(199-BY ) く <L/19)GOSUB 149:GOTO39
139 IF TM>5 THEN GOTO 179 ELSE 59
149 SOUND7,&B11911111:SOUND6,19:SOUND12.L:SOUND13.9:SOUND19,16:PALET 1,1
159 R=RNDx199+69:FOR I=1TOL+L/2 STEP 5:POLY(169,199) , 1 ,RNDX2+1 ,R,」+1,489+1+1
169 P=I:NEXT:S=S+(299-L/2)/2:ST=S:CLS4 :RETURN
179 SOUND7,&B11911111:SOUND19 ,16:SOUND12,255:SOUND13,9
189 FOR I=1 TO 369 STEP 19:POLY(160 ,169) ,1,4,129,9,369:NEXT
199 CLS:CSIZE 3:LOCATE6,8:PRINT#9 "GAME OVER":KEY 9."":PAUSE 4
299 LOCATE19,11:COLOR2:PRINT "REPLAY Y KEY ":COLOR7:Y$= INKEY$ も (1)
219 IF Y$S<>"Y" THEN END ELSE 19
。nWeg サ と YAT コム て さき 1
は J 芝 全 納 皿 “Ok ロー の どき aw、
_。v(! へ の 吉 O ミ て VH て っ 臣 省 租 。 中
CS きび らき 閉 の 翌 の 黄 机 選 及 時 痕
2 0 の)
て か
が が の EE
か の
PA
か ム
2
NM
も も
うう 株
今 用
は さ
9: 和 れ
れ る
し な
て ん
て て
旨い
画 変 数 リス ト ・ RR…- 爆 発 パ ツー ン の 形 プレ イ あう 店 。
ロ X…… 敵 の X 只 標 ・ 較 プロ ブラ ハム の 説明 ・ 画 チ エッ フ ボ イン ト ・ 1 画面 な の で あま りつ け 加 え
BY…… 英 の Y 座 標 ・ 10 一 25 初期 設定 1 ・ 。 お お あーす ご い | ワイ ヤー フレ : る こと は な い ガ が 210 行 が 気 に な
| …… 距 離 ・ 30- 40 初期 設定 2 ・ 一 ム の 敵 が 3-D で せま つて こる 。・ る な 。 ご これ で は 再 ゲ ー ム の と き 、
日 …: 滑 去 用 距離 の ダミー : 45 星 表示 ・ 。 この プロ グラ ム 、 ス ピー ド を ・ 大 文字 の "Y” し ガ 受 け 付 け な
KX.KY…… 英 消去 用 ダミー : 50 キー 入力 ・ 速く する だ め に 、 い ろ い ろ と 賢 ・ い ぞ 。 IF Y$ く )〉 ヤツ THE
V…… 英 の 形 ・ 60 スコ ア 、 残 り 玉 数 、 ・ いこ と を や っ て る ぞ 。PEEK(& : N こ を IF INSTRCYy ン ^Y$)
P…… キ ー 入 力 用 距離 の 表示 ・ H2E) と いう と ころ で キー 入力 ・ =O THEN- と し て みよ う 。
TM…… タ マ の 数 ・ 70-80 敵 の 表示 ・ を し て いる が 、002EH 番 地 に は : これ で 大 文字 小文字 の ヾ Y” と
S…… ス コア ・ 90-130 ビーム ルー チン : 今 押さ れ て いる キー の コー ドガ が : カマ カナ の バン の どれ を 押し
ST…… ス コア の ミー と 難易 : 140-160 敵 の 爆発 ・ 入っ つて いる の だ 。 STICK 関 数 * て も 、OK だ い 。 災 バッ チリ 賞 。
度 ・ 170-210 ゲー ム オ ー バ パー・! リ ・ を 使う より 、 ち よっ つと ば か の 速 ・
レア /
W
WNW
W
UM い
こん な ゲー ム 、 よ ぐ 1 画面 で 作れ だ
も ん だ な あ 。
切れ 目 が ひと コマ 分 な ら 6[6
キー で その まま いけ る けれ ど 、
2 コマ 分 な ら 一 度 落 ち て は い
ヽ ふ あがり 、 3 コマ 分 な ら |8| キ ー
遊び 方 で ジャ ンプ し な いと 渡れ な い 。
自作 の 『JUMP MAN』 を 1] 画面 ブロ だ が だ くち は ん ド の が きだ
グラ ム に 凝縮 し た ニュ ー バ ー ジ ョ ン 。 し の 床 に 落ち る と アウ ト だ 。
JUMP MAN を |4I6] キ ー で 左右 に
動か が も し 。IBIC シャ ンク 。 どん と どん くず
れ て いく レン ガ の 床 を と び ま わ っ て 、
19 INIT:CLS4:WIDTH1 :DEFINTA-Z:CLICKOFF:ME=1:GOSUB85:SOUND7,56:SOUND3。5:SOUND2.9
金 袋 を 全部 ひろ いつ くす ゲー ム だ 。 全 15 X1=X:Y1=Y:IF Y<23 THEN F$=CHARACTER$(X,Y+2) ELSE 75
時 陸生 2 IF F$=" " THEN IF J=9 THEN V=1:GOTO39 ELSE 39 ELSE J=:V=B
部 ひろ うと 、 溢 の 面 へ 進む 道 が 屋上 に $
25 S=STICK(9) : IFS=6THENH= 1 :M=9ELSEIFS=4THENH=- 1 :M=1ELSEIFS=8ANDF$= " ぶ "THENJ= 1
叶 くる ぞ 。 39 IFJ=9THEN35ELSEIFJ= 1THENSOUND9,16:SOUND13,1:S0UND12,59:V=-1:J=J+ 1
35 C1$=CHARACTER$(X+H, Y+V) :C2$=CHARACTER$(X+H, Y+V+1 )
49 IFC1$= " ま K"THENJ=9:V=-V:GOT035ELSEIFC2$= "* ま "THENIFJ=9THENV=9 :GOT035ELSEV= -V:GOTO
3SELSEIFC1$=" 炎 "ORC2$= "%"THENSC=SC+ 19xME:K=K+1 :PLAY999:PLAY"V1505C9DEFGAB"
45 X=X+H:IF X<1 THEN X=29 ELSEIF X>29 AND (K<15 OR Y>2) THEN X=1
59 YsY+V:IF Y く 1 THEN J=9 ELSEIF K=15 THEN CGEN1:LINE(31,4)-(39,4),"K":CGEN
SS LOCATEX1.,Y1:PRINT" と ELOCATEX,Y:CGEN1 :PRINTM$(M) : :CGEN:RX= INT(RNDx28 )+1
69 RY=INT(RNDx25 ) : IFCHARACTER$(RX,RY) く >"%"THENLOCATERX,RY:PRINT" ":
65 IFK=15THENPLAY "Cg+C-C" : IFX=38ANDY く 4THENLOCATE19,12:COLOR4 :PRINTME: "ST CLEAR":
PLAY99:PLAY"04C1EGCEGCFACFA-GDG-GDG+CRB+C5":ME=ME+ 1 :CLS: INIT:GOSUB85:K=9:GOTO15
79 LOCATE34,19:PRINTSCi :LOCATE35 ,14:PRINTME: :GOTO15
75 LOCATE12,7:COLOR5 :PRINT "GAME OVER": :PLAY129:PLAY "04A1RE9RERF3ER#G1RA3"
89 LOCATE19,11:COLOR7:PRINT"TRY AGAIN [Y]":KEY9、"": IFINKEY$(9)="Y"THENRUNELSE89
85 M$(9)=" 淫 せ 寺 ":M$ も (1)=" ま て 杯 FORI=4T029STEP4 :CGEN1 :LINE(9,1)-(36,1),"* ま ":FORL=9TO
2:LOCATERNDx6+Lx19+2。1-1:PRINT"%":NEXT :LOCATERNDx25 , 1 :CGEN:PRINT" "5 NEXT ・
シス 3
ぶ W 拓 用
vuv |
- こ
・ 錠 展 疹 征 ) ・
-YTWY4
SrerSF |
層 o オ H 下
ゅ さき 。HAS せ きび AO
加 . ふ % ン
Ne
の
叶い dt
ご びび びり J 座 記 テ コー ニ AS は りき |
95 X=10:Y=22:RESTORE199 :FORI=249T0245 : READD$:DEFCHR$(T)=HEXCHR$(D$) : NEXT : RETURN
199 DATA 999C1E3C183C3C3D3C3C3E3C18991831999C1E3C18991831 , 7E3C189926E28293623018
9926E2820362393C3C26E28293,9939783C183C3CBC3C3C7C3C1899188C8939783C1899188C
195 DATA 7E3C1899644741C9469C1899644741C9469C3C3C644741C9 , 9999999999999999DDDD99
777709DDDD90999999999999909 ,99931E9999999999181B1E7C7EFFFF7E1818997C7EFFFF7E
の
Ok の 作 補 テ で きき
NsNNS
評 き て HBS (tok 2 の aaa
oo
8 oo
に ーー】
画 変 数 リス ト が ・ 10 初期 設定 ・ 85- 95 初期 設定
XY…… 新 ジャ ンプ マン 座標 : SO 〇 …… ス コア ・ 15- 20 足元 を 調べ る ・ 100-105 キヤ ラフ タデ ー タ
XYIPe 旧 ジッ ンプ マレ 用 MS ラル シク マツ の Y ャ ・ の キー 入力 ・ 画 チ エッ フ ボ イン ト
標 ラク フタ ・ 30 ジャ ンプ 負 理 ・。 うこ む お 、 よ く ぐ 1 画面 に まとめ
H…… 水 平方 向 ベ フト ル ・ 上 お …… ジ ャ ンプ マン の 足元 の ・ 35-- 40 移動 先 を 調べ る ・ だ も の だ 。 感心 し て し まう 。 あ
V…… 垂直 方向 ベ フ トル キャ ヤラ クタ ・ 45-55 移動 ・ と 時 間 制 限 で も 付け れ ば も っ と
り J…… ジ ャ ンプ フラ グ ・C1$,C2$…… ジャ ンプ マン ・ 60 床 を ぐず す ・ お も し ろく こなつ だ だ ろう けど 、
RXRY…… く ずれ る 床 の 座 標 の 移動 先 の キ : 65 面 クリ ア 判 定 ・ そう し た ら ま きず 1 画面 に は 納 ま
M…… ジ ャ ンプ マン の 向き ・ 及 22S9. を 36 スコ ア 等 表示 ・ ら な か つ だ だ ろう し ……。 文 バ
・ 還 プロ ブラム の 説明 ・ 75- 80 ゲー ム オ ー バ ー 処 理 * ッ チ リ 賞 !
麻雀 秘伝 の パッ クス ソフ トニ カ (会 044-953-2380) OPC-6001(32K).mk II/6601 つ テープ Y\4.200 @ ボ ポン 、 チ ー、 カ ン 、 口 し と 】
ン 、 リ ー チ な どの 声 が 出る 4 人 対局 式 コ ンピュータ マー ジャ ン 。
に オ を ( 計時 時
WW
還 UUUUMM
!
遊び 方
送 ス クロ ー ル の カー レー ス ・ ゲ ー ム
な ん だ けど 、 い ろ ん な 面 が あっ て な か
な か 楽し め る ぞ 。
テン ・ キ ー の |4!6| で 車 を 左右 に 動か
し て 障害 物 れ を よ け 、 次 々 に 走破 し て い
2
ROAD 1 で は 壁 を 抜け 、ROAD2 で
べべ
アン
US mWVH さ 4 つと VMNVHS こ
1
VH
上
| よ
| う
較 二 和
な
| り
| ま
L
た
ト 音 N 抽 ST せき
SR
* 三
さ 筑 理 層 商 隊 交 き で HAYy き Aoka 1
っ
「T)
田 変 数 リス ト ・180-270
X1.V…… 車 の 座標 ・280-330
NOV が の 朋 ど 5
HS…… ハ イス コア ・340-390
EX.FX.GX…… 障 害 物 の 座標
S,AB……ROAD( 環 数 ) ・400480
X2.Z…… 煙 の 座標 3
BO…… ボ ポー ナス ポイ ント ・440-550
田 プ ロブ ラム の 説明
10- 30 初期 設定 ・560-680
40- 90 画面 設定 3
100170 ゲー ム ス タ ー ト ・690-780
26
1 FI PO を が で や
早い ここ ここ HIGH SCORE
K 2
K タイ や や ささ
アー を イス
さん 4 る
は 岩 を よ け 、ROAD3 で は 水
の 道 を 抜け 、ROAD4 で は 水
と 、 水 れつ ぶし な が ら 転 が っ
て くる ドラ ム か ん を よ け 、R
OAD5 で は 人 岩 と 禁 走 車 を よ け
直る の 7 だ
を そし て 、ROAD 6 は ボー ナス 面 。
道 の 途 中 に ルビ ー と ダイ ヤ が 転がっ て
を し を を し や そし や こそ し や そし や ゃ る を
ト 。 を
も アア スプ アズ ヘア ャ アヘ デラ アヘ デル と ヘン アヘ シル アヘ も ンプ っ
2
うま 0 が PdK 学 と うた し う チ ハア ッ ゲ トブ
"と うう も る を 3:
トト プ ミ スプ スプ スッ アス ズミ と ヘア シア ュ トブ て ト 、 る
で "を "そう を や を を を を てこ やこ を やこ キー を こそ いも を
を を し シレ と 、 モ そし を し を を し と を し を し を る
プス
人 2
2
を と し と そし や と と
と を し を を し あし を そし や そし や し を や を と を ゃ ー
に クト プス プス イミ ゲス シア スバ ス ペラ アヘ ドラ アス メス アス ゲス デア スプ
を 、 を し を し ネエ レ を 、 を し を し を を し や 、 を し で を し を そ を 名 さ
を
トブ シア パ
を を
し コ
スプ トス アス アタ ヘス スペ
を
すそ
を
を を 分 本 ご を を で を
し や を を を し を k -
と プレ アト プ も アア ヘラ スバ コ
で を と て を で を て
トコ
そ を
と る
ゃ で を を
KK
4 ニー
に 2 に 2
>
OAD2 の 面 。
そ
か *
4
4
2
岩 を よ け て 走る R
る
人
HIGH SCORE
29669
"YOUR SCORE
2 0 っ
いる の で な る で くだ た くさ ん ひろ ゎぉ お う 。 人
ルビ ー は 100 点 、 ダ イヤ は な ん と 1000
点 だ 。
ROAD を 1 か ら 6 ま て 走破 する と 、 が が SC 計 還 年 SNR
を の と き の 得 点 の 10 分 の 1 が ボー ナス 4 ゾク ツン 、 い か ガ が に も 冷た そう ね お 氷 /
に しん アクス され 、 き
た ROAD1 か ら 繰 り 返 計
し だ 。 た だ し 、 繰 り 返 計器
し て いく と 、ROAD2 2902 畑 還 ba
が だ ん だ ん むず か し く 22 和 26 全て よい
な っ て くる ぞ 。 SYS
スク グ と 2/S が ニム 5 の
は 多い の で 編集 部 で は 9
嫌 わ れ も の な ん だ けど 、 ペ
こん な に 面 が ある と や 5 ペ
つう ば り 楽 し い * ね 。
メイ ン ル ー チ ン ブル ー チ ン ・ 一 番 最 後に で も :DEFINT A-Z
ROAD 1 の サブ ルー ・ 790 て 840 スコ ア 表 示 ・ と 入れ て お こう 。 ご これ で スピ ー
チン : 850-950 エン ド ・ ド が ちょ つと あがる ぞ 。
ROAD2 の サブ ル ・ 960-1000 ボー ナス ・。 ま た 、 ア イス ブロ ッ フ の 面 が
ー チ ン ・ 1010-1150 キャ ラク タ 設 定 : 難 か し いと いう 人 は 、440 行 の ヒビ
ROAD3 の サブ ル ・ 玉 チ エッ フ ポ イン ト ・X〉 16 と EX=16 を それ ぞ れ 15
ー チ ン ・ いわ ゆる スク ロー ル ゲ ー ム だ : に し て 460 行 の PRINT の スペ
ROAD4 の サブ ル ・ けど 画面 の 多 さ と 美 し さ (や ) が ・ 一 ス を 1 つ ふ や し て み ま し ょ よう 。
ー チ ン うけ だ 。 ・ 文 バッ チリ 賞 。
ROAD ら 5 ら の サブ ル ・ お つと 、 こ うい う ゲ ー ム に 付 ・
ー チ ン ・ きも の の DEFINT (変数 を 整数 ・
ボー ナス ROAD の サ ・ 型 に する の だ ) が な いそ ぞ 。10 行 の ・
レー ンー
NIRC に
・( 99999999999999999999999999999999999999999999999..)$dHOXHH=( く E )$HOdHQ
m・( 9 と も と C ヤ VG8II8I8I899Z ヤ も ヤ < ヤ 99「8666681I8IOE9999OE9999. )$dHOX ヨ H=( GEZ )$dHOd コ Q
mu(,.I8I8I8I8I8I8I81818ddddd コ ココ ゴ ココ ゴゴ 【8998991899【899199..)$dHOXHH=( ヤ EZ ) $HOddQ
es (HAI8BI8IVIV6618d/9999999999999999dH/d コ ココ ゴゴ ゴゴ ゴゴ ゴゴ ) $HHOX ヨ H=( EEZ ) $HO ヨ ヨロ
X.(。999999899I9999999999998I819999999999999999999990,.)$dHOXHH=(ZEZ ) $HOdHQ
ペ . (9999 コ dd9999d499999999999999999999999999dd コ HH999999.,)$HHOXdH=( IEZ ) $HOdaQ
昌 .(,.8199V も 6dd6CG998181d/9//OEHH9dH/819981 ヤ E9 も Z92Z98199.. )$dHOXHH=( 9 と CZ )$dHOddd
すす . (098【 ヤ E9 も 9 と 8T999999898EOI9I99999999898EOI9I9999. )$dHOXdH=( 6ZZ )$HO ヨ dQ
$.(. う 9 つ 099 ヨ dd ヨコ HO う 9O090929 う 999 コ dddD909 う 9 う 92929d コ ddO92999 )$8HOXdH=( 8ZZ )$dHOdHd
@. (9E9E9Ed/d/959E9E9E9E9EddddH9E9E9E9E9E9Ed/d/959E9E ,)$dHOX ヨ H=( ZZ ) $HOdd ロ
. (9 と 9/8V9Z ヤ 9H9GT ヤ 999999999999999999999999999999999.. )$dHOXdH=( 9ZZ )$8HOd コ dQ
〇 。 (9908 と CZ ヤ [ ヤ 9898999ddd コ d/dH/HEOEOT819999999999999999,. ) $dHOX コ H=( GZZ ) $dHOdHQ
@. (9999OE9999OE8I8I66661899C ヤ と? ヤヤ 99【81I819881IVGZ ヤ Z ャ 99,, ) $dHOXHH=( ヤ ZZ ) $dHOdHQ
sdLOVdJVHO 1HdVT1
ぃ LNIdd:9I "と TI dLVOO'1: 9=0d:0d+OS =OS : LXHN
1+0S " 議 提 半 持寺 』DNISIILNIdd:/ 0T109:6' と E dLVO0T
s【O+,AVT1d: STINO ヨ LNIdd:T+/ OM 1 0102:9I "と 1 LVOOTI
E ddLS 0d 0 【=I 0』
NdIILdd:i/ 0O109:。
9NHDO:999G AVWId:9dHdH:(91/OS ) Ni =0d
dQNd: 9S1O:Add NdHL Z く <NA 』I
9E OILOD:S1O NdH エ LT >NA 』1
9Z6 NdHL 9=NA 』I:($V'$NA)dLSN 1! =NA
ms く >$V ILN[] :SAHMN 1 =$V : LVd ヨ dd
ぃ se[ N JO 人 人 ],LNIdd:ZI "6 dLVOOT
ぃ HIB5 人 JIL,.LNIdd:91'9[ dLVOOT
9NdDO:/ 07100: 9ddHd : 上 XN
ぃ 僅 LNIdd:8【 "IX dLVO0T1
[+/ QOW ! 0100)
G9C 0 !=I 0』
EI QNOS:9G'ZI QNOSETE*8 NOS:/T 2 NOS:E9*9 NOS: て 【 "1 NOS:981*9 QNOS
Nd[1Ldd
OS * 剤 提 提 培 #』DNISUILNIdd:6 "CE dLVOO01: HOOS IOA,LNIdd:/ "6Z dLVO0T
S* 拉 提 提 #: VOd.DNISIILNIdd: て [6Z dLVOOT
9gZ8 dS'IH
:9E8 OLOD:9 HSVT1dO:, VOd SIINOd LNIdd: と 【 6Z。 dLVOOT1: 1 HSVTdO NdHI 9=9 qOM S 』I
SH * 斉 提 音信 寺 』DNISI1LNIdd: セ CE dLVOOT1: HOOS HDIH,.LNIdd: と "6Z dLVOOT1:9 NdDO
JS=SH NdHL OS>SH 』I
99Z OILOD
nsLNIddi1-Xd*XD-Xd dLVOOT: ma LNIdd:Xd*Xd LVOOT1:XD+X ヨ =X ヨ
[-=XD dSIH [=XD _ NHL 【[-=XD 』I
9g// dS1dH 99/ NdHL XX。 く >$V dNV , < く >$V 』dI:(Xa'XD+Xd)$VNd=$V
[-=XDO dS1H [=XD NdHL IX く <Xd 』I
9G/ OLOD:[-=XD dS71 ヨ H 9G/ OLOD:T=XD NdHL 【X>Xd 』I
9? ヤ / dS1d 9E/ NdHL 9E>(99【X※([)dNd) INI 』I
と +Xd=X』 JST1H 6+(IIX([)dNd)LNI=X ヨ iT=Xd NdHHL CC く <Xd 』1
ぃ OLNIdd:9"6+(IIX([)dNH) LNI dLVO0'1 NHI 9=(GX(I)QNd)LNI 』I
【+OS=OS ST1H 9=dV:T+S=S _NdHL [9Z く <dV 』I:T+dV=dV
9g/Z OO5
9G9 OLOD NHHL ,@,=(/1"A+IX)$VNd dO @,=(/[ "A+IX)$VNd 1
。・9V も 0,AV'1d:991+OS=OS NdHL, す =(/1"A+IX )$VN』d 』1
rg9VGO,AV'1d : 999【+OS=OS NdHL 昌 =(/1 "A+1X )$VN』d 』I
9G9 dS1 ヨ d 9/2Z NdHL , =(/I"A+IX)$VN』 』I
996 IISOD:9=Xd:i【+S=S:9= ヨ V NdHL 99Z=dV 』I
918
998
96/
98/
9//
99/
9G ん
9 ヤ /
9E/
9 と /
9 1 ん
9 ん
969
989
9/9
999
9G9
g ヤ 9
9E9
@ ズ 7 系
$ LNIdd:9"Xd ヨ LVO0T
ぃ = ま 明 ST1H 放 。=$ 日 NHHL 9E=X』d 』I
[+(9EX( TI)dNd) LN =X』
6+(IIX([)dNd) LNI =Xd
9 と 9 NdHL 98[<dV 』I
9/? NdHL /I>dV 』I
[+dV=dV
99Z JST1HiT=Xd:iT+S=S:9=dV NdHL 99Z=dV 』I
nmmmmmiLNIHd:Xd'Xd dLVO0T
ぃ ぃ LNIdd:T-Xd'XH LVO0T
と +X』=X』 dS1d 6+(/X(【[)dNd) TNI =XHEiT=Xd NdHL CC く X』d 』I
wmuLNIdd:9"6+(IIX(【)dNd)LNI LVOO1 NHHL 9=(9IX([)dNJ) LNI 』I
9g9 と NdHL < と >dV 』1I
【+OS=OS : [+dV=dV
9g9 と OO5
【+S=S: 1=Xd:6+(/※([)dNd) LNI=XH:9=dHV NHHL 99ZC=dV 』I
ぃ ぃ LNIdd:9'"Xd LVOOT
remmmmmmmmmmsLNId:9'6 HLVOOT
91=Xd NdHL 9I<Xd 』I
6=Xd NdJHL 6>Xd 』Il
[-(EX(【[)dNJ) LN TI+X=X
6+(6X([)dNd)LNI=Xd NHHL =dV 』I
[+OS=OS :[+dV=dV
99Z OOD:T+OS=OS ST1H 【+S=S:9=HV NdHL 99Z=dV 』1
ぃ OLNIdd:9"Xd dLVO0T
6+(【IX(I)QdNd) TNI =X
り 96E dS'Id 9/E NdHL 9=Xd』 dQOM d ヨ V 』I
[=X』 NdHL [>Xd 』1I:T[+(((Z/S) -91{ )x([)dNa) LN I =X』
[+HV=dV
99 と OLOD:【+OS=OS
[+HV=dV dS1H I+S=S:9=HV NdHL 99C=d ヨ V 』I
ぃ ぃ LNIdd:9'Xd dLVO0T
WWWWWWWWWLNIdd:9"6 dLVO0T
6+(6X(T)dNd) LNI =X ヨ
9 と CE HS1H 96Z NdHL 9=9IQON dV 』1
98【 OILOD:96/ IISO0D:9=AEA=Z:A+TZX=ZX:ATIX=IX
9gG8 NdHHL , く >(/【"ATIX)$VNd 』I
969'96 ヤ "99?'9?E'99Z'99G OILOD It+9 qQOW S NO
[=A NdHI 9=IS 』1
1-=A NH ャ =LS 』Il
(9)3OILS=LS
ぃ 介 LNIddE8【"【X LVOOTI
ぃ XaLNIdd:6[ "Z-ZX dLVOO0T1: INd9 う
9gI'EI QNOS:I"ZI NOOS:IE*8 NOOS:9I "2 NOS:Z*T NOOS:【*9 NOS
IOSN0O: (GT)$HHOTNIdd:TT*6' も Z*9 HOSNOO
ぃ 。 suLNIdd:8["【X dLVOOT
IXdN:9I'EI dNIOS:T*ZT QNOSEIE*8 NOS:9【 "2 NOOS:Z*【[ NOS:I*9 NHOS
ョ コー HLS 1 OL 592s』 Oda
:([T)$ ヨ OVdSLNIdd:EI'6 LVO0T
9[ ヨ S(IVd:6'EI QNOS:9 も "と 1 NHOSETE'8 NOS:9I "2 NOS:9*[ NOS:I も I*9 NOS
sgdIVGdIVGdTV ヤ 0,,AV'1d
(【[)$ ヨ OVdSLNIdd:GI'6 ヨ LVO0T
ws く >$AdJNI 1ILNI] :tVdddd
nA ANV ILIH,LNIdd:GI'6dLVO01 : 9Nd5 う
WWYWYWWWWWLNIddEEI "6 dLVO0T
ぃ 信 LNIdd:8[ IX dLVOOT1:[ NdDO
96/ dI1SO5D
TXdN: ょ る 4(T[)$OVdS+,@,NIdd:I'8 dLVOOT: も Z 0L 9=I 0』
"(も と "8 と )-(9"9)dNIT:[ N ヨ DO
96 OdWHL:, ミ UN へ AA =$NA :[-=X り : [=Xd: 9=dHV: 1=S:9=OS: ヤ 1=ZX: ヤ [=IX
9d ヨ dd :ZAddi9'[ ILHTVd:dd TLHSd'(/ "TEZ)-(9*9)dNIT
に |
り 171: (AX)$HLOVdVHO=(A"X)$VNdddO : 9999Z=SH : HLOVHVHO, SO05 : も S10 : 9 も HLOIA:LINI
9 と 9
919
999
96G
98G
9/G
99G9
9GG
9 ヤ G
9EG
9 と G
91G
99G
96 ャ
98 ヤ
9/ ヤ
じ ド 】/
し に 1 4
9 ヤヤ
9E ャ
し 【4/
9 1?
99 ヤ
96 と
99E
9/ と
99E
9GE
45
9EE
9ZE
9【IE
9 と
6 と
998Z
9g/ と
99 と
し ド に 【Z
し 』 メ の
9 と と
9 と
9 と
9
96【
98[
9/【
991
9GI
りり
9E【
9 と 【
9{!
99【
96
98
9 ん /
99
9G
9 ヤ
9 と
9 と
0
9 1
H
層
マン
E
8
レル /
ックス (会 03-366-4345) PC-6001(32K),mk II プ 6601 つ テー プ \3,800 但 エイ リア ン を ドア の な か
閉じ こめ る 、 ビ ヒット ゲー ム 「『 ド アド ア 」』 の 動き を 改良 し た PC-6001 版 。
つ
て 一
遊び 方
(スス メー ツク ォ オー スム 」 の チー マン ソン ン ググ
も 品 ず る みな が ら 、 フ "レイ する と も っ
と 楽し いか も 。 な か な か ム ス い 。、 ス ペ
mA の コー デイ ング 720
[21416I8I で 画面 中 央 に ある 周 準 を 移
還 き させ ぜ せ 、 セ ョ コ ヒ ョ ゴビ ピ ョ ー ン と 奇妙
に 動き まわ る 敵 を や っ つけ て くれ 。 ビ
ー ム は 、 ス ペー ス ・ キ ー が だ 。
敵 の キャ ラク タ は る す が X 1 。 色 も
し brSTRNCE
3 S6
Co BEENM
< 寺 。 18
め ね りら ・
わ
CO に atS は 合わ お 『
放
。 ス
1J
|
| を
衣
隊 ,
| ト
| カ
レー
Su 定 富 ワーS へ
^ 圧 は 大 の こ ーー の の ーー
Ne
の
で ~
ン
_
_S ワ ーー 。 き と er
Ns
1: の
ベビ ご と ざ へ ロコ き ーー ざ は きみ 計
は さと 4J 准 叶 陵 ※ テ こき へ 融
と rr せ J 馬 OーX は と SS(( 二 コケ 計
2
oN シン ペン で
WW
きれ いで カッ コ い い ぞ 。 全 部 で 6 種類
の 敵 が あり 、 そ れ ぞ れ 得 点 が ちがう 。
赤い や つ は 500 応 。 た だ し 、 こい
つ は 近づい て くる スピ ー ド が は か の 3
借 は や て ぐ て 、 ウ ロ ツ ロロ し て いる と あっ
と いう ま に や られ ちゃ う ぞ 。
敵 キ ャ ラ の 変 な 動き は 、 画 面 の 端 に
行く と ピ ョ ー ン と は ね
か える だめ 。 慣れ て く
れ ば この 動き を 予測 で
きる か ら 、 か えっ て ね
らい 撃ち に 利用 で き る 。
ビー ム は 1 機 に 対し
て 11 発 し か 撃て な い 。
11 発 全部 は ずれ る と ゲ
ーー クー で 0
な ぜ が ガ が 順調 に ここ
で きだ 。 こう な つ だ ら 、
目指 せ 、 不 倒 の 大 記録 。
ら 、DISTANCE ( 英 ま で の 間 離 ) が
0 に な っ て も ゲー ム オ ー バ バー が だ 。
再 ゲ ー ム し だ いと よき は 、 ス ペー ス ・
キー を 押 そ う 。
と ころ で 、 こ の ゲー ム 、 作 者 が P.C.
G. を 理解 し た その 日 に 作っ た ゲーム な
だ る うそ て そ す 。
文 参考 「 テ クノ ポリ ス 」8584・4,『STA
RWARS」
+†OP
ら SCORE
補
STRR MRRS
TOP
9
ら SCORE
1 4 の 9
DISGTRNCE
に
っ ムッ ザ ^ ュ ツア ュ マッ ママ ュ で ギィ < ツィ く マ アッ マタ ェ < マッ スペ スマ ニス
ドア ィ |
の C/77 ビ 77 戸
19 GOSUB419
29 WIDTH 49:INITECLS4:CLICK OFF:X=12:Y=12:A=INT(RNDx22 ) : B= INT(RNDx22 ) : CFLASH
39 LINE(9.9)-(319,199) ,PSET,6.B:LINE(299,9)-(299,199) ,PSET,6:K=INT(RNDx199\19) :F
OR 1=1 TO 49:S=INT(RNDx197+1 ) :D=INT(RNDx197+1 ) : PSET(S,D,7) :NEXT :PLAY5999
49 COLOR5:LINE(25.9)-(39,24),"X"。B:COLOR6 :LOCATE28 , 2:PRINT "STAR WARS":TI=199
59 LOCATE27,5:PRINT "TOP" :LOCATE27 ,8:PRINT "SCORE" : COLOR3 :LOCATE27 ,12:PRINT"DISTAN
CE":LOCATE27.15:PRINT"BEEM" : COLOR4 :LOCATE27.18:PRINT "by .":LOCATE27 ,29:BE= 19
69 PRINT"Katsushi .T":IF K=<4 THEN H$ も ="IJK" ELSE IF K=5 THEN H$="LMN" ELSE IF K=6
THEN H$="@AB" ELSE IF K=7 THEN H$= "CDE" ELSE IF K=8 THEN H$="FGH"ELSE H$="OPQ"
79 COLOR7:LOCATE32 , 6 :PRINTUSING "林間 間 半 "日 1 :LOCATE32 , 9 : PRINTUSING " 村 提 持 #" ? SC
989 LOCATE34 ,13:PRINTUSING"###" 5TI ELOCATE35 , 16:PRINTUSING "本 "BE:T$=INKEY$( 9 )
399 COLOR7:LOCATEX ,Y:PRINT"+":LOCATEA,B:CGEN1 : PRINTHS$ : CGEN
109 IF I$="8" THEN Y=Y-1:LOCATEX,Y+1:PRINT" "
119 IF I$="2" THEN Y=Y+1:LOCATEX,Y-1:PRINT" "
129 IF I$="4" THEN X=X-1:LOCATEX+1,Y:PRINT" "
139 IF I$="6" THEN X=X+1:LOCATEX-1.Y:PRINT" "
149 IF STRIG(9) THEN GOSUB199
159 IF Y=9@THENY=Y+1ELSEIFY=24THENY=Y-1ELSEIFX=9THENX=X+ 1ELSEIFX=24THENX=X- 1
169 TI=TI-1:IF H$="OPQ" THEN TI =TI- 2 ELSE IF TI<@ THEN LOCATE36 , 13:PRINT"9"
179 IF TI< く 9 OR BE<9 THEN 379
189 GOSUB249:GOTO79
199 LINE(1,198)-(Xx8+3,Yx8+3) ,PSET ,1:LINE(199,198)-(Xx8+3.Yx8+3) ,PSET , 1
299 PLAY3999:FOR 1=1 TO 5:PLAY"V1508C9" :NEXT :PLAY5099
219 BE=BE-1:1TF X=A+1 THEN IF Y=B THEN 349
229 LINE(1,198)-(Xx8+3,Yx8+3) ,PRESET , 1 :LINE( 199, 198)-(XX8+3。 YX8+3) 。、PRESET , 1
239 RETURN
249 U=INT(RNDx199\19 )
259 IF U=1 THEN A=A-1
269 IF U=2 THEN A=A+1
:LOCATEA+1.B:PRINT"
:LOCATEA-1.B:PRINT"
279 IF U=3 THEN B=B- 1 :LOCATEA, B+1:PRINT" "・PLAY"V1408CDEF"
289 IF U=4 THEN B=B+1 :LOCATEA,B- 1 : PRINT" ":PLAY"V1408CDEF"
2Z99 IF A=9 THEN FOR !=1 TO 19:LOCATEA,B:CGEN1:PRINTH$:CGEN : A=A+ 1
NT" "・NEXT
399 IF A=22THEN
NT" ": NEXT
319 IF B=@ THEN
NT" "・ NEXT
329 IF B=23THEN
NT" "・NEXT
339 RETURN
・PLAY"V1408CDEF"
・PLAY"V1408CDEF"
・LOCATEA-1,B:PRI
FOR !=1 TO 19:LOCATEA ,B:CGEN1 :PRINTH$:CGEN: A=A-1:LOCATEA+ 1 , B: PRI
FOR 1=1 TO 29:LOCATEA ,B:CGEN1 :PRINTH$:CGEN: B=B+ 1 :LOCATEA, B- 1 : PRI
FOR 1=1 TO 29:LOCATEA ,B:CGEN1 :PRINTH$:CGEN : B=B- 1 :LOCATEA , B+ 1 : PRI
349
359
FOR 1=1 TO 19:COLOR7 , 2 : BEEP : COLOR7 , 6 : NEXT
IF _H$="IJK" THEN SC=SC+199 ELSE IF H$="LMN" THEN SC=SC+159 ELSE IF H$= "CDE"
OR _H$="FGH" THEN SC=SC+299 ELSE IF H$="@AB" THEN SC=SC+399 ELSE SC=SC+599
369 GOTO29
379 PLAY599:PLAY"03F5RC5R2C5D7C7R7E7F7 : 05F5RC5R2C5D7C7R7E7F7":PLAY"08":PLAY5999
389 Q=8:W=9:FOR 1=1 TO 12:LOCATEQ,W:COLOR7 :PRINT "GAME OVER":W=W+1:LOCATEQ, W- 1 :PR
一 次 数 リス ト
INT"
399
499
419
429
430
449
459
469
479
489
490
599
519
529
539
549
559
569
579
589
599
NEXT :LOCATEQ,W:PRINT "GAME OVER"
IF HI<SC THEN HI=SC
IF STRIG(9) THEN SC=9: BEEP : GOTO29 ELSE499
DEFCHR$(&H49 ) =HEXCHR$( "9498181F1F1898949498191F191998949498191F19199894")
DEFCHR$(&H41 ) =HEXCHR$( "243C66E7FF7E7C84A5BFE4E57C7C3C2424247CFD646464A4" )
DEFCHR$(&H42 ) =HEXCHR$( "291998F8F8981929291998F898981929291998F898981929")
DEFCHR$( &H43 ) =HEXCHR$( "99FF7F3E3E7FFF9969FF99999999FF9999FF99999999FF99" )
DEFCHR$( &H44 ) =HEXCHR$( "99FFFF9999FFFF9999FF99999999FF9999FF99999999FF99")
DEFCHR$( &H45 ) =HEXCHR$( "99FFFE7C7CFEFF9999FF99999999FF9699FF99999999FF99" )
DEFCHR$(&H46 ) =HEXCHR$( "FF3C7E7E7E7E3CFFFF397878787839FF993C7E7E7E7E3C99" )
DEFCHR$( 8&H47 ) =HEXCHR$( "FF999999999999FFFF999999999999FF9999999999999999")
DEFCHR$( &H48 ) =HEXCHR$( "FF3C7E7E7E7E3CFFFF397878787839FF993C7E7E7E7E3C99" )
DEFCHR$( &H49 ) =HEXCHR$( "898981FFFF99A498898981FF8999BC98898981FF8999A498")
DEFCHR や も ( 8&H4A ) =HEXCHR$( "993CFFFFFFFF9999923EC9E9FCF89999993CC3FFFF9F9999")
DEFCHR$( &H4B ) =HEXCHR も ("999989FFFF9925199999997F91193D19919181FF91992519")
DEFCHR$( &H4C)=HEXCHR$( "9929798888799999FF2179F8F8799999FF91798888799999")
DEFCHR$( &H4D ) =HEXCHR$( "9999247E6624999999999981C3E718669999998199DB9999" )
DEFCHR$ も ( &H4E ) =HEXCHR$( "99949E11119E9999FF849E1F1F9E9999FF899E1 1119E9999")
DEFCHR$( &H4F ) =HEXCHR$( "1F9C969696969C1F993C7E7E7E7E3C999999999999999999")
DEFCHR$( 8&H59 ) =HEXCHR$( "81423C99993C428199999918189999999999991818999999")
DEFCHR$(&H51 ) =HEXCHR$( "F89C969696969CF8993C7E7E7E7E3C999999999999999999")
RETURN
だ た ら さ つと 敵 が 逃げ て し まう 。
初期 設定 ・ 画 面 設定
ポッ ルル ーー グ
20- 60
70 一 160
あと 、 敵 の キヤ ラフ が 変 つ
て も 、 動 き が 同じ と いう の は つ
HI…… ハ イス コア
X.Y…… 上 準 器 の 座標
AB Re 敵 の 座標
190~230
240-330
340-360
に た で だ A
英 の 動き
中
それ か ら BEEM や DSTAN
CE の 初期 値 が 小さ すぎ て 、 あ つ
と いう つま に や られ て し まう つ 。 そ
ま ら な いな 。 そ れ ぞ れ 違 つ 動 き
を し て ぐれ だ ら す ご い の だ けれ
ご も 、 そ れ を や つて だ ら プ ログ
ー の 座標 こ で 40 行 最後 の |=100 を 999 に 、
50 行 最後 の BE ヒ =10 を 99 に し て
し まお う 。 こ れ で で き な き や
コ だ ね 。
フラム の 半分 ほど を 書き 換え な い
と な ら な いけ ご ど …。 ど な だ か や
つて みて は Y 文 ヨッ シャ 賢 。
レル ノ
370~ て 400 ゲー ハム オー バー
410~ て 590 キャ ヤラ 定義
田 チ ェ エッ クボ イン ト
せつ が ガ が ぐ 照準 が あつ だ と 思 つ
思 且 Se 間
T ト 上 …… ひ DISTANCE
田 プロ グラ ム の 説明
レア y み
RUN る せる と し ば らく は まっ くろ け 。
みみ 寺 枚 た か が 作 の の と 心配 に な っ て
きた ころ 画面 が 現れ る 。 ポ ッ ポ ボッ ポ ッ
と 星 と モビ ルス ー ツ が 出 て きだ た ら 、 ゲ
ー ム 開始 だ 。
f
せ
| nm ビ S 革 環 調 と 7
を
て
か
あう
も
は
ゴ
ン
の )
ト
リ
890
統
た に
「
1
し
た
、26
、 歳
の
- チチ
ツル
ン
ジグ
・ よ
^
池
生
代
の
溝 DDorS こ すさ
画 変 数 リス ト ・ YH…… 敵 の Y 座 標
A…… キ ャ ラク 定義 用 デー タ ・ RE…… 敵 の スピ ー ド 制御 用 待
A$…… キ ャ ヤラ クタ 定義 用 ち 時 間
XS…… 背 景 の 星 の X 座 標 ・ XT…… 次 に 動く 敵 の X 座 標
YS…… 背 景 の 星 の Y 座 標 ・ YT…… 次 に 動 こ 敵 の Y 座 標
CS…… 育 景 の 星 の 色 ・ 田 プロ ブラ ム の 説明
X…… 明 準 の X 座 標 ・120 初期 設定
Y…… 明 準 の Y 座 標 ・130-210 キャ ヤラ ンタ 定義
DA…… ダ メー ジ ・ 220-240 ゲー ム 画 面 作 成
EN…… エ ネル ギー ・250 初期 値 設定
D$…… ダ メー ジ 表 示 ・260-300 敵 の 出現
E$…… エ ネル ギー 表示 ・310 敵 の スピ ー ド 制御
P…… 倒 し だ 敵 の 数 ・320 一 430 敵 の 秘 動 及 び 攻 到
PX…… 1 面 に 表 わ れ る 敵 の 数 ・440 ビー ム ん 発射
XH…… 敵 の X 座 標 ・460 得点 表示
枠 の 外 に ある 三角 形 は 、 ビ ー ム 早 準
の イン ジ ケ ー タ ー だ 。 こ の 三角 形 を [2|
[8 [4I6@] キ ー で 移動 きせ 、2 組 の 二 角
形 を 結ん だ 線 の 交点 を 敵 の モビ ルス ー
ツ に あわ せ ビ ー ム 発射 。 あ た る と 内 光
が 画面 を 包み こむ 。 敵 も 接近 し て くる
470
460
490-550
560-650
再 ゲ ザー ム ガ
4
照準 移動 サブ
660 一 /20 敵 弾 中 サ プ
730-660 ビー ム 発 射 サ プ
690-1900 キヤ ラン 定義 デー
3
一 チェ ツン フ ボイン ト
うーむ 、 と 待 だ され だ と 思 つ
だ ら 、 届 の 準備 も し な いう ち に
の ー が 短 ま つう て で し まう た だ 。 こ
うつ いう の は 不 親 切 だ 。 そ こ で …
255 TEMPO 2007LOCATE
17.11:PRINT"FIGHT『 和 FOR
マ 三 角形 の 準 を ビタ ッ と あわ せ て 。
各 サ イズ の 敵 の 表示 ・
と 攻撃 し て くる ぞ ( 移 の と ころ が 黒く
な る の が 攻撃 の し る し だ)。
モネ ルー が 0 に な っ だ り 、 ズ メー
ジ が いっ ぱい に な る と ゲー ム オ ー バ ー。
文 参 考 「Oh! MZ」583・4,『PCG EDI-
TOR プ ログ ラム 』」/ グ の 84・3,『SOUND-
WICH」
1=O TO 15:PLAY"06AO+
ANEXT:LOCATE17.11: ピ
RINT" ・ ピ AUSE
Oo どう か な マ
それ か ら 470 行 に ある 「HE
・ N120 ELSE こ は THEN
・CLS:GOTO 220ELSEー に
・ レ し だ ほう が 、 時 間 の か か る キヤ
・ ランタ 定義 を 飛ば させ て いい と
・ 思う よ !
何 度 や つて 「 ふ ん 、 敵 の 攻
・ 撃 が 里 い 」、 と 感じ だ 人 は 310 行
に 4 つ あ る 、RE = の 値 を , ご,
・ 4, の , 1 と 小さ くし て み ま し よ
2 ムー
"| |
39 「'| SPACE COMBAT |
49 '| |
59 '| FOR X-1 |
69 '| |
79 '| Programed Dy マコ ト |
89 '| |
99 '| 1984.3.1-26 |
199 '| |
ト す 0 ソニ ーー dg 陸 7 交 0
129 INIT:CLS 4:WIDTH 49:CLICK OFF:DEFINT A-Z:PRW
139 RESTORE 8969
149 FOR I=9 TO 197
159 A$="“"
169 FOR J=1 TO 24
179 READ A
189 A$=A$+CHR$ も ( A )
199 NEXT
299 DEF CHR$ も (! )=A$
219 NEXT
229 LINE(9.9)-(319.175),PSET,7.B:PALET 1.9:LINE(1.1)-(318,.174) ,PSET , 1 BE
239 FOR ST=9 TO 89:XS=(INT(RNDx318) )+1:YS=(INT(RNDX174) )+1:CS=(INT(RNDX7 ) )+1:PSE
T(XS,YS,。CS) : NEXT
249 COLOR 6:LOCATE 1.22:PRINT "ENERGY > 還 還 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 OLOR 3:LO
CATE 1,23:PRINT"DAMAGE> [FTFTTTTTTTTTLTTTTTTTTTTTTTTT" ECOLOR 7
259
3109
TIME=9:X=19:Y=19:DA=9:EN=154:P=9
PX=(INT(RNDX6) )+2:FOR R=1 TO PX
XH=(INT(RNDx5 ) ) x8+3:YH=(INT(RNDx3 ) ) x7+3
IF CHARACTER$(XH,YH)=" "| THEN 299 ELSE 279
LOCATE XH.YH:CGEN 1:PRINT#9 ,CHR も (8&H9):CGEN 9
NEXT
IF TIME く 129 THEN RE=12 ELSE IF TIME <249 THEN RE=9 ELSE IF TIME く 369 THEN RE=
6 ELSE RE=3
329 XT=(INT(RNDx5 ) ) x8+3:YT=(INT(RNDx3 ) ) xX7+3
339 IFCHARACTER$(XT.YT)=" " THEN329 ELSEIFCHARACTER$(XT , YT ) =CHR$(&H9 ) THEN349 EL
SEIFCHARACTER$( XT , YT ) =CHR$( &H3 ) THEN389 ELSEIFCHARACTER$( XT ,YT ) =CHR$(&H16 ) THEN4
29 ELSEIFCHARACTER$(XT, YT ) =CHR$(&H2C)AND(INT(RNDx5 ) ) >1 THENGOSUB669 ELSE429
349
469
P:CLICK ON
479 LOCATE 12.22:PRINT"REPLAY 2 (Y/N) "ELOCATE 27.22:IF INKEY も (1)="Y" THEN 129 EL
FOR G=9 TO RE:GOSUB 499
GOSUB 569
IF STRIG(9) GOSUB 739
NEXT:GOTO 329
FOR G=9 TO RE:GOSUB 519
GOSUB 569
IF STRIG(9) GOSUB 739
NEXT:GOTO 329
FOR G=9 TO RE:GOSUB 539
GOSUB 569
IF STRIG(9) GOSUB 739
NEXT:GOTO 320
CLS4:LOCATE 1.9:COLOR 7:PRINT USING" ア ナタ 八 寺 韻 填 井 キ テキ ブ サ ^ キ ツイ シテ チカ ラフ ツキ マシ タ 。 アー メン ":
し ず を ( 月
SE IF INKEY$(1)="N" THEN 489 ELSE 479
489 END
499 CGEN 1:LOCATE XT,YT:PRINT#9 ,CHR$ も (3) :CHR$ も (4) :LOCATE XT,YT+1:PRINT#9 ,CHR$( 6) :C
HR$(7):CGEN 9
S599 RETURN
S19 CGEN 1:LOCATE XT-1 、YT-1:PRINT 半 9 ,CHR も (18 ) :CHR も (19) :CHR$(29) :LOCATE XT-1,YT:PR
INT##9 , CHR も (21 ) iCHR も (22 ) :CHR$ も (23) :LOCATE XT-1 ,YT+1 :PRINT#9 ,CHR も (24 ) :CHR も ( 25 ) : CHR$
(26):CGEN 9
oS29 RETURN
539 CGEN 1:LOCATE XT-2.YT-2:PRINT#9 ,CHR$( 36 ) : CHR や (37 ) : CHR$( 38 ) : CHR$( 45 ) : CHR$ も ( 46 )
:CHR$(47):LOCATE XT-2,YT-1:PRINT#9 , CHR$ や (39 ) : CHR$( 49 ) :CHR$ も (41 ) iCHR$( 48 ) :CHR$( 49):
CHR$(59 ) :LOCATE XT-2。YT:PRINT 拉 9 ,CHR も ( 42 ) : CHR$( 43) : CHR$( 44 ) :CHR$( 51 ) : CHR$( 52 ) : CHR
$(53)
S49 LOCATE XT-2 。YT+1:PRINT#9 ,CHR$ も (54 ) :CHR も (55 ) : CHR$( 56 ) : CHR$( 63) :CHR$( 64 ) iCHR$( 6
5) :LOCATE XT-2,YT+2:PRINT#9 ,CHR$ も (57 ) : CHR$(58 )CHR$( 59 ) : CHR$ も (66 ) : CHR$( 67 ) : CHR$( 68 )
・LOCATE XT-2.YT+3:PRINT##9 ,CHR$ も ( 69 ) : CHR も (61 ) : CHR$ も ( 62) : CHR$(69) : CHR$( 79) : CHR も ( 71) :
CGEN 9
559
569
579
580
599
69
619
629
639
PRINT"4" ECREV 1:LOCATE 39.Y+1:PRINT""
守ら
RETURN
ら S=STICK(9)
IF X>3 AND S=4 THEN X=X-8
1F X く <35 AND S=6 THEN X=X+8
IF Y>3 AND S=8 THEN Y=Y-7
IF Y く 17 AND S=2 THEN Y=Y+7
CONSOLE 9.25.9,1:CLS:CONSOLE 9,25,39,1:CLS:CONSOLE
CONSOLE 21.1:CLS:CONSOLE 9,1:CLS:CONSOLE
LOCATE 9,Y:COLOR 7:PRINT "AM" ECREV 1:LOCATE 9,Y+1:PRINT "4":CREV 9:LGCATE 39,Y:
へ 判
メー ス 2 誠
ー 2
(2
《①:
スー パー ホロ スコ ー プ や 日 本 ファ ルコ ム ( 代 0425-27-4121) FM- 7 /NEW 7 ( 要 漢 字 ROM)/77・PC-8801.mk II 〇 テー プ 6 ア
\6,800,. 3.5、5 イ ンチ ディ スク \7.800 劉 漢 字 対 応 の 西洋 占星 術 シ ステ ム 。 プ リン で 出力 され る ホロ スコ ー プ が きれ い 。
〇
へ 全 S 民 村 へ 由 表 mmmJ 避 へ ざこ て eeett9t し 穫 d の 司 ーHY 壮 に NININId 光
SPACE COMBAT リ スト 続き
62
649 LOCATE X,9:PRINT"M" ELOCATE X+1.9:PRINT"4":CREV 9:LOCATE X,21:PRINT "会 、“
659 RETURN
669 SOUND 9.59:SOUND 1,1:SOUND 6,1:SOUND 7,.8:SOUND 8,16:SOUND 12.1:SOUND 13.10:L
0CATE XT,YT-1:COLOR 7:PRINT" 語 "LOCATE XT,YTEPRINT" 還 "PAUSE 5:LOCATE XT,YT-1:PE
INT" 還 較 ":LOCATE XT,YT:PRINT" 還 還 ":PAUSE 5:PRW 255:PALET 1,7
679 SOUND 1.,1:SOUND 9,.28:SOUND 7,62:SOUND 8,19:SOUND 6,16:SOUND 7,.55:SOUND 8.16:
SOUND 12.79:SOUND 13.9:PAUSE 19:PALET1.9:PRW
689 LOCATE XT,YT-1:CGEN 1:PRINT#9 ,CHR$( 41 ) iCHR$(48):LOCATE XT,YT:PRINT#9 , CHR$( 44
) iCHR$ も (51):CGEN 9
699 DA=DA+1
799 D$=STRING$ も (DAxX2," 古 ")
719 LOCATE 9,23:COLOR 3:PRINT D$:COLOR 7:PAUSE 19
729 IF DA=15 THEN RETURN 469 ELSE RETURN 329
739 IF EN<5 THEN RETURN 329 ELSE PALET 1,1:SOUND 9.9:SOUND 1,1:SOUND 6,1:SOUND 7
8:SOUND 8,16:SOUND 12,1:SOUND 13,19:PAUSE 1:FOR T=9 TO 3:PALET 1.9:PAUSE 1:PALE
T 1,1:PAUSE 1:NEXT:BEEP 9
749 EN=EN- 1
759 E$=STRING も (39-(INT(EN/5)), "ロロ " )
769 LOCATE 9.22:COLOR 6:PRINT E$
779 COLOR 7
789 IF CHARACTER$(X,Y =" "| THEN 889 ELSE
799 IF CHARACTER$(X,Y =CHR$(&H9 ) THEN 899 ELSE IF CHARACTER$ も ( X,Y ) =CHR$( 8&H3 ) THEN
819 ELSE IF CHARACTER$(X,Y) =CHR も (8&H16 ) THEN 829 ELSE IF CHARACTER$(X,Y)=CHR$( &H
2C) THEN 839
899 CGEN 1:LOCATE X,Y:PRINT#9,CHR$( 1):CGEN 9:GOTO 859
819 CGEN 1:LOCATE X,Y:PRINT#9 ,CHR$( 9 ) iCHR$(19) :LOCATE X,。Y+1:PRINT#9 ,CHR$( 12) :CHR
$(13):CGEN 9:GOTO 856
829 CGEN 1:LOCATE X-1.Y-1:PRINT#9 ,CHR$( 27 ) :CHR も (28) :CHR も (29):LOCATE XX-1,Y:PRINT 提
9 , CHR$( 39 ) : CHR$(31 ) ?)CHR$(32 ) :LOCATE X-1,Y+1:PRINT#9,CHR$(33) iCHR$(34) ijCHR$S(35) :C
GEN 9:GOTO 859
839 CGEN 1:LOCATE X-2,Y-2:PRINT# せ 9 ,CHR も (72 ) :CHR も (73) iCHR も (74 ) :CHR$ も (81 ) 1CHR$(82):C
HR$ も (83) :LOCATE X-2.Y-1:PRINT#9 ,CHR$ も (75) iCHR$(76 ) :CHR$ も (77) iCHR$( 84) j:CHR$( 85 ) iCHR$
(86) :LOCATE X-2,Y:PRINT#9 ,CHR$ も (78 ) :CHR$ も (79) iCHR$ も (89 ) )CHR$ も (87 ):CHR$(88) iCHR$(89)
849 LOCATEX- 2 ,Y+ 1 :PRINT#9 , CHR$( 99 ) :CHR$(91 ) :CHR$( 92 ) :CHR$(99) :CHR$(199) iCHR$(191
) :LOCATEX- 2 ,Y+2:PRINT#9 , CHR$( 93 )・CHR$( 94 ) :CHR$ も (95 ) :CHR$( 192):CHR$ も (193) iCHR$(194 )
・LOCATEX- 2 ,Y+3:PRINT#9 ,CHR$( 96 ) : CHR$(97 ) :CHR$ も (98) iCHR$ も (195) iCHR も (196):CHR$(197):
CGEND
859 SOUND 1.1:SOUND 9.28:SOUND 7.62:SOUND 8.19:SOUND 6,31:SOUND 7,55:SOUND 8,.16:
SOUND 12,.79:SOUND 13.9:PALET 1.9:PAUSE 19:CONSOLE Y-2.6,X-2.6:CLS:CONSOLE:P=P+1
869 PX=PX-1:IF PX く < く >9 THEN RETURN 329 ELSE
879 PAUSE 39:RETURN 269
889 PALET 1.9:RETURN
899 DATA 9,24,.9,24.9,.9,9,9,24,69,126,36,24,36,66,128,9,24,9,9,9,9,9,9
999 DATA 9,9,9,9,9,9,9,9,145,147,68,49,147,49,68,211,145,9,9,9,129,9,9,145
919 DATA 9,.9.9,.9,9.9。9.9.9,9,9,9,9.9.9.9.9,9.9,9,9,9,9,9
920 DATA 0。1。 12、6.69.95. 8.3.01.3、3.57.0.28、28.12 .0.1.0.2.7.9.2。3
939 DATA 9,128,48,96,.252,196,192,192。128,192,192.156,.9,56,56,48,9,128,9,64,224,
9,64,192
949 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9
959 DATA 14,16,24.64,.96,9,9,9,9,12.32。48,128,192.9,9,9,9,9,9,9,9,9,9
969 DATA 112.8,24、9 9,9,9,9,.9,48.4,12.9,9,9,9,9,9,9,9.9,9.9,9
979 DATA 9,9,9,9,9,6@,9,9,9,9,9,9,9,9,9,.9,9,9,9,9,9,9,9,9
989 DATA 9,9.9,9,9,6,.9,9,227.241.57,.29,.15,7.63,255,139,193,33.17,8.5,32,152
999 DATA 9,9,9,9,.9,9,.9,9,199,199,149,152,176,.249,239,224,4,71,.8,16,32,17,36,128
1999 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9,9
1919 DATA 9,9,9,9,9,9,9,9,231 ,143,28,57,113,225,192,128,228,139.16,33,65,129,12
8,128
1929 DATA 9,9,9,9,9,9,9,9,249,249,248,216,142.199.67.99.9,32,128.16,8,132,66,34
1939 DATA 9,9,9,9.9,9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9
1949 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,.9,.9,9,9,9,9,9,9,9,9,9
1959 DATA 9,9,9,9,9,9,9,9,.9,.9,9,9,9,9,9,9,9,9,9,9,9,.9,9,9
1969 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,.9.9.9.9,9,9,9,9,9,9,9
1979 DATA 9,.9,1,9,9,15.9.9.9.9.9,7,15,9,15,15,9,9,9.9,.9,9,9,9
1989 DATA 9,9,189,129,231 ,255,126,192.24,126,126,126,24,9,129,129,9,9,69,9,192,
255, 66,9
1999 DATA 9,9,128,.9,9,249,9,9,9,9,9,224,249,9,249,249,9,9,9,9,9,9,9,9
1199 DATA 9,9,9,9,9,9,4,7,15,15.3,9,1,3,3,8,9,9,9,9.9,.9,9,9
1119 DATA 192,126,126,255,192,9,9,9,129,129,129.9,129,195,129,9,.9.66,126,69,9,9
, 9 ,g
1129 DATA 9,9,.9.9,9,9,32.224,.249,249,192.9,128,192,192,16.9,9.9,9.9,9,9,9
1139 DATA 9,32,56,9,9,9,9,9,39,28,64,112,112.9,9,9,9,9,9,9,9,9,9,9
1149 DATA 9,9,9,.9.9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9,9,9,9,9
1159 DATA 9,9,9,9,9,9,9,9,112,112.9,9,9,9,9,9,9,.9.9.9,9,.9,9,9
1169 DATA 9,9,9,9,9,9,9,9,9,9,9,115、223,159.9,9,9,9,9,66,144,159,9,9
1179 DATA 9,9,9,9,9,9,9,9,32.56,8,152,184,253,127,127.32.56,8,16,32,129.64,72
1189 DATA 9,9,9,9,9,9,9,9,1,3,14,12,152.248,.248,.249,1,2.8,8,144.9,64,9
1199 DATA 9,9,9,9,9,9,9,9,9,1,15,79,249,136.9.3,.9,1,8,78,241,136,9,2
1299 DATA 9,9,9,9,9,9,9,9,127,255,255,255,255 ,127.255,255,65,9,16.9,128,68,128,
16
1219 DATA 9,9,9,9,9,9,9,9,224,231 ,252。248,248,249,224,224.9,7,4.9,136,16,9,64
1229 DATA 9,9.9,9,9,9,9,9,3,3,31,255,241 144,128,128,2,2,16,142,225,144,128,128
1239 DATA 9,9.9.9.9,.9,.9,.9,255,255,255,248,298,128.9.9,2.64,7,49,89,128.9,9
1249 DATA 9,9,9,9.9,9,9,9,248,.252,252,238,15,7,1.3.9,9,16,232,8,6,9,2
1250
1260
1270
1280
1299
1300
DATA 9.9,9,9,.9.9.9,9,9,9.9.9,9,9,9,9,9,9,9、9,9,9,9,9
DATA 9,9.9,9,9.3.9,9,9,9.9,9,9,9,31,63,9,9,9.9,9,9,9,9
DATA 9,9,9.9,15,143,143.128.3.3.63,127,127,127.127.127.9,9,9.9,15,15,15,9 本
DATA 9.9,1.9,9,7.4.4.9.9.9.3,7,9.3.3,.9,9,9.9,9,9,9,9
DATA 9,9,249,7.3,255.9,9,127,255,6,.248.252.9,255,255,9,9,1.3.3,1.9,9
DATA 192.252 252.255.255 255.127、127.63.3、8.0.0、0.128.128.64.252.252.255.2
S5,254,129.112
1319 DATA 4,9,9.9.9,9,9,9,3.3.3,3。3,.9.9.9.9,9,9,9,9,9,9,9
1329 DATA 9,9,9,9,9.9,.9,15,199,199,199,199,199,63,63,9,9,9,9,9,9,9,9,9
1339 DATA 126,124,124.126,127.255.255,255,128,128,128,128,128.9,9,9,9,9,9,9,112
ぅ 2Z48.254.255
1349 DATA 9,9,9,9,249,241 ,241,1、192,192.252.254,254,254,254,254,9,9,9,9,249,249
5249.9
1359 DATA 9,9.9.9,9,192.9,9,9,.9.9.9,9,9,248,252.9、9,9,9,9,9,.9,9
1369 DATA 9,9,9.9,9.9,9,9,9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9
1370 DATA 3,.63.63.255,255 ,255,254 254.252.192,.192.0,9.9,1。1,2.63.63,255。255 。127
> づり 。14 「
1389 DATA 9,9,159,224,192,255,9,9,254,255,96,31,63,9,255,255,9,9,128,192,192,12
8.9,9
1399 DATA 9,9,128.9,.9,224.32.32.9,9,9,192.224.9,192,192,9,9,9,9,9,9,9,9
1499 DATA 126,.62.62,.126.254.255 ,255,255,1 。1,1,1、1.9,9.9.9.9,.9,9。14,.31 ,127,255
1419 DATA 9,9.9,9,9,9,9.249,182。182,182,182.182.252,252.9,9,9,9,9,9,9,9,9
1429 DATA 32.9,9,9,9,9,9,9,192.192,192,192,192.9,9,9,9,9,9,9,9,9,.9,9
1439 DATA 9,9.9.9,9,9.9.9,9,9.9.9,.9,9,9,1.9,9,9,9,9,.9,9,9
1449 DATA 1,1.9,9,9,.64.64.96.2.6,15,31 ,63,63,191 ,159,9,9,9,9,.9,9,9,9
14S59 DATA 255,255,255 ,129,.9.9.9,9,9.9.9,128,249,224,192,128,255,127,63,9,9,9,9,
9
1469 DATA 9@,.9.8.8.12.6,.3.9,3,7,7,23,51 ,121 252,255.9,9.9,9,9,9,9,9
1479 DATA 48,39,9,9.9,9,192.9,297,224,252,248,249,224.9,128,9,9,9,9,9,.9,9,9
1489 DATA 9,.9,9,9,9,.9,.9,9.9,9.9.9,9,9,9,9,9,9,9,9,9.9,9,9
1499 DATA 9,9,9,9,9,9,9,9,255,255,255,254 ,124.9,9.9,9,9,9,9,9,9,9,9
1599 DATA 9,9,9,.9,9,9,9,9,128.9.9,9,9,9,9,9,9,9,9.9,9,9,9,9
1519 DATA 9,9,9,9,9.9,9.9,9,9.9,9,9,9,9,9,9.9,9.9,9,9,9,9
1529 DATA 255,255,255,39.9,9.9,9,9.9,9,1,15.7,3,1.255,254,.252,.9,9,9.9,9
1539 DATA 128,128,9,9,4.4.4,12.64.96,249,248,248,259,251 ,243,9,9,9,9,9,9,9,9
1549 DATA 9,9,9,.9,9.9,9.9.9,9,9,9,9,9,9,128,9,9,9,,9,9,9,9
1559 DATA 9,9,9,9.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9
1569 DATA 248,9,9,9,9,9,9,9,7,127,63。 63.31.31。15.9.9.9.9.9.9,9,9,9
1579 DATA 9,9,9,.9,9,9,9,9,192,224,224.224,224 224,192,.9,9,9,9,9,9,9,9,9
1589 DATA 9,9.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9
1599 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,B
1699 DATA 9,9,9.9,9,9,9.9.9,9,9.9.9,9,9.9,9,9,9.9,9,9,9,9 '
1619 DATA 9,9,9,9,9,9,.9.9,249,126,.63,15,.3,15,7,3,128,.68,49,12,2,12,4,3
1629 DATA 9,9,9,9,9,9,9,9.9,.9,128,192,248,249,224,.249,9,9,9,9,169,9,64,16
1639 DATA 9,9,9,9,9,9,9,9,15,7,3,1,3,3,15,31,9,4,2,1,2,2。9,28
1649 DATA 9,9,9,.9,9.9,9,9,.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9
1659 DATA 9,9,9,9,9,9,9,9,254,127,31,255,127,63.31,7,128,199,16,129,68,32,25,4
1669 DATA 9,9,9,9,9,.9,.9,.9.3,15,7,135,15,135.199,227,2.8,4,4,9,4,4,66
1679 DATA 9,9,9,.9,9,9,9,9,9,128,192,64,193,255,255,255,9,128,192.64,68,128,144,
139
1689 DATA 9,9,9,.9,9,9,9,9,3,7,15,63,255 ,255,255,255,2,4,8,32,8,132.9,9
1699 DATA 9,9,.9,9,9,9,9,9,243,255,255,255,255,255, 255,255,2.9,162.9,8,64.9,128
1799 DATA 9,9,9,.9,.9,.9,9,9,128。 224,192,128,128,9,128,192,128,32,64,9,9,9,9,9
1719 DATA 9,9,9,.9,9,9,9,9.9,9,9,1,7,7,31,255,9,9,9,1,4,4,16,132
1729 DATA 9,9,9,9,9,9,9,9,9,4.254,252,248,249,224,192,9,4,128,49,9,128,9,192
1739 DATA 9,9,9,9,9,9,9,9,225,9,249,224.224,128,128,3,225,9,89,9,96,9,128,2
1749 DATA 9,9,.9,9.9,9,9,9,255,127,63,31.63,127,255,254,34,64,33,16,36,65,144,9
1759 DATA 9,9,9,9,9,9,9,.9,9,192,192,224,192,128,9,.9,9,9,9,32,9,9,9,9
1769 DATA 9,9,9,9,9,9,9.9,15.63,159,223,223,255,255,255,8,32,16,29,16,.9,34,9
1779 DATA 9,9,9,9,9,9,9,9,252,248,249,224.9,249,253,255,72.9,9,224,9,9,33,9
1789 DATA 9,9,9,9.9,9,9,9.9,1.3,7.15,63,255,255,9,1,2,4,8,33,9,18
1799 DATA 9,9,9,9,9,9,9,9,255,63,31 ,14,69,129,9,9,291 ,32,17,19,32,129,9,9
1899 DATA 9,9,9、9,9,9.9,9,255,255,255.9,9,9,1.7,2.36,.255,.9,9,9,1,4
1819 DATA 9,9,9,9,9,9,9,9,255,255,255,63,63,249,241 ,241,65,4,192,34,32,129,33, 1
1829 DATA 9,9,9,9,9,9,9,9.9,9,1.7,3,15,31.63,9,9,1。4。2.8,18,36
1839 DATA 9,9,9.9,9,9,.9,9,15,63,252,248,248,249,152,136,8,35,9,72,9,96,16,8
DATA 9,9,9,9,9.9.9,9,195,143,255,253,29.59,243。127,2412,144,133,17.34,139,
7
1859 DATA 9,9,9,9,9,9,9,9,127.69、39,15,9,9,9,9,65.36,16,15,9,9,9,9
1869 DATA 9,9,9,9,.9,9,9,9,24,24,.49,3,9,9,9!9,16,16,33,3,.9,9,9,9
1879 DATA 9.9,9,9,9。9.9,9,241.227,193,129,3,7,3,14,145,162,1,129,2,4,3,14
0 DATA 9,9,9,9,9,9,9,9,255,248,199,231 ,131 ,195,129,249,151,.64,56,199,139,66,
1899 DATA 9,.9,9,.9,9,9,9,9,39,4,9,224,252,255,248,254,26,4,9,9,128,71,8,139
1999 DATA 9,9,9,9,9,9,.9,.9,63,15.5,9,9,249,28,9,49,19,5,9,9,224,28,9
の DATA 9,9,9,9,.9,9,9,9,224,192,128,129,192,249,248,252,32。64,128,129,64,16,1
1929 DATA 9,9,9,9,9.9,9,9,127,127,254,252,31 ,15,31,15。72,65,139,224,16,19,16,19
1939 DATA 9,.9,9,9,9,9,9,9,192,128,.9,9,224,248,252,248.64,128,9,9,32,136,68,8
2 DATA り 9,9,9,9,9,9,9,9,248,249,224,249,192,128,128,224,72,16,169,16,64,128,1
1959 DATA 9,9,9,9,9,9,9,9,63,127,254,127,39,12,9,9,32,73,132,97,18,12。9,9
1969 DATA 9,9,9.9.9,9,9,.9,224.69,28,56,9,9,9,9,224.36,29,56,9,9,9,9
ゲー ミソ
テッ ェ ッ た
地獄 の 練習 問題 つの エム ・ エ ー シ ー (会 06-315-0541)FM- 7 / 8 /NEW 7 /773.5、5 イン チ デ ィ ス ク \6.,800 人 天使 に な る
だ め に 地獄 で 試験 を 受け る アド ベン チ ヤー ゲー ム 。 い ろ ん な 試験 官 の 質問 に 正解 する と 道具 や ヒン ト が も ら え る 。
の と だ ZH ル 7
の と /7 ア アビ
6?
か な か むず か し い ぞ 。
参 考 「 マ イコ ン BASIC マ が ガ ジン 」
7 て 戦車 を 、 で N 博 士 を 左右 83・6,『MOG MOG』
に 動か し な が ら 地 中 深く も で っ て いこ
う 。 戦 車 で 穴 を 掘り 、N
| |OI 遊び 方 陸上 が 不発 弾 (*) に 触れ
る と 不発 弾 を 処理 し た こ
3291 年 (ほとん で も な く 未 来 )、 第 3 次 と に な り 、 ス コア 加算 。
世界 大 戦は M 博 士 発明 の コバ ルト 爆弾 た だ し 、 戦 車 が 直接 不
に より 終結 し た 。 生 き 残 っ た わずか の 発 弾 に 触れ だ た り 、N 博 士
人 類 は シェ ルター に の が れ 、 冬 眠 に 入 が 下 に ぶつ か うだ りす る
っ た 。 時 は 流れ 、4291 年 、 冬眠 か ら 晶 と ゲー ム オ ー バ ー だ 。 リ
覚め た 人 類 は 地 中 深 くも で っ て いる プレ イ は ANY KEY。
発 弾 を 処理 する た め 、 リ モコ ン 式 の 地 戦車 の あと に うま く N
底 戦車 を 開発 し た の だ が ……… 。 リモ コ 博士 を 通し て いく の が な
ン 式 な ど と いう アホ くる さい 方 式 に し て
し まっ た 開発 者 の N 博 士 は を の 責任 を
と り 、 戦 車 の あと を つい て 、 地 左 へ 不
発 弾 処 理 に 向かう の だ っ た 。
や
6
NR
" 朋 NDY う 41 うく
中 *+ の
本
・ ぺ は
ひ 〇 や ゅ NN |
そそ コ N
で N ビ は
9 は
と
の
ょ 茎
へ 1O 〇 …Q・
mo+ Il+ コ て の ビ は
"で ①
ウ の て の で エ + ィ ン C)IY パ NM
9
\ ン 【_】
8
と さい ト
0
ゝ ヽ びび 古 ぶ (
"U
| ご ン
+ ャ コ ++ 中 へ ・ ら
>
』 人 三
3 P
V 。 4
SEL
4 P
ORS
TCR
へ 2
N エ
Ne
だ = こ 〇 上 (は ンズ
喉 の 、 +QーQO や
Il + つ + ャ で や
DP s
ァ ス uuEJuE juE 均 -
ーー 夫 て で の 大 TA
いい の 憎 ヘ ンズ 必 の や
IO =
OF
まわ
名
に た
| い
0 0
| ん
| だ
| け
| と
| や
| め の
ら
- れ
ま
せ
ん
ロロ Mi っ
+・ 剛 区 エエ
先 じ が 。
た 人 GO 〇 で 大 ょ 大 ハハ ・ て エイ の へー
て で て で +
秋 の =2 NN
の em4O の On 0
は は ズ N そ 埋
6 969 96
の は へ ば 必須 等 す ひ さび き て 琶 2
さき Sr 。slw と て 詩 店 に JIN 装い ー
mm 圭 。NYH 山 。He ま 導 v は
ごい さす 。 叶 4 柏 吾 療 町
一 変数 リス ト ・P…… 戦 争 消 去 の 際 の X 座 標 : 4 博士 ・ 戦 車 ・ 土 ・ 爆 : きり いつ て 、 こ れ は の 人 で や る
X…….N 博 士 の X 座 標 ・ 還 プロ ブラム の 説明 弾 の 表示 ・ ゲー ム で す 。 婦 め ちゃ ん こ ム ズ イ 、
Y…… 戦 車 の X 座 標 S 初期 設定 > ゲー ム オ ー バ ー 処 理 : バッ チリ 賞 。
Ga スコ アウ > スコ ア 表 示 と キー ス : 田 チ エッ ツ フ ボイン ト
回 iP スコ コツ ・ 戦車 の あと に つま ぐ 人 を と お ・
O…N 博 士 溢 去 の 際 の X 座 標 " 3 博士 ・ 戦 車 の 消去 " す の が 、 だ い へ ん 難し い 。 は つ
ふつ う の よ く あ る お 酒 な の に 、 タ コ
の キャ ラク タ を つけ だ だけ で フカ 売れ
し た お 酒 が あっ た わ ぇ 。
同じ ゲー ム で も 、 キ ャ ラク タ の よる
で 人 気 が 出 ち ゃ うっ て こと も ある し 。
で 、 こ の 『 タ コマ リン 」j。 い わ ゆ る 、
ふつ う の 港 水 艦 ゲー ム な ん だ けれ ど 、
と きど き 出 て くる ボー ナス の 大 ダコ が
の ひか が いて 、 も て も も も し ろく な っ て い
る の だ 。
キミ が あや つる の は 、 海 に 浮か ぶ 駆
逐 艦 。 中 皿 キ ー て 諾 右 に 移動 し な が ら 、
マグ ネ チ ッ ク 爆 弾 を 投下 し て 、 敵 の 洪
水 艦 を や や っ つけ よ う 。 爆弾 投下 キー は
と [|。。 これ で 左右 に 投下 する の だ 。
潜水 艦 は 深い と ころ に いる の を や っ
つけ だ ほう が 、 上 難し いぶ ん 点 が 高く な
る ぞ 。
ln
edb dn
0
Ei
は
ひき ざさ JIN 。 村 コー キー ロロ の の
な
ん
が
る
いる Sm さい 半 上 半 中 へ 41S の 直 宇 さ 半
| J 提 っ rvoyrr で か 人 S ま びと J 沿
| つて SC 寺 と 0 は NS 旧
| N き St . 田 料 目
この ゲー ム の 売り 物 、 大 ダコ を や っ
つけ る と ボー ナス 500 点 。
料 弾 の 爆風 が タコ や 潜水艦 に 触れ る
だ け で や っ ける こと が で きる の で 、 い
っ ぺん に まとめ て や っ つけ ら 65 れる よう
効率 的 な 攻撃 を 心がけ よ う 。
敵 の 潜水 艦 は ゲカ プ カ と 浮か ん で <
る 機 香 で 攻撃 し て 〈 る 。
点 以 上 に な る と 、 タ イマ ー が も と に も
と る の で さら (G 高 得点 が ね ら え る の だ
リプ レイ は スペ ー ス ・ キ ー を 押 そ う 。
今回 は タコ の 出 て くる ゲー ム が 、 他
機種 に も あっ た けど 、 や っ ぱり まだ タ
っ の 人 気 は 続い て いる の か な 。 で も 、
エリ マキ トカ ゲ と か ラッ コ と か は 投稿
作品 に は 見 あたら な いか ら 、 今 度 は る
の へ ん を も ねらっ だら 7? (も う 古 いか )
SCORE 本 まま 1 お は 日 1 生ま の 189 T1ME 9B:@4:24
ちら の 57b。 ご 50 の 5 うっ
か りあ だ っ て し まう と ゲ
デム オー バー だ 。
また 、 制 限 時 間 も 3 分
に 決め られ て いて 、 残 り
時 間 が な く な っ て も ゲー
ム オ ー バ ー。 で も 、5000
ャ 今 し も 大 ダコ に あ だ
つ だ 爆 弾 が 爆発 し よう
と し て いる ぞ 。
A ボ カン 。 真 中 の 十字 は 爆発 し た と ころ な の だ 。
ー さ スバ パーク バッ シュ へ ワー クハ ウス (会 03-263-5429) ひ M 5 (Pro..Jr.) 要 BASIC-G つ テー プ \3.,500( 通 信販 売 の 送料 込み ) ん し 】
> バッ ェ ッ ル ん / @ 小 さ な 小 屋 に 閉じ こめ られ だ 人 間 を 助け て いこ ゲー ム 。 へ ヘンテコ な 怪物 や 落と し 穴 に ご 注意 !
NNIN3m NIS
て NN 拉 om 4 う 史 へ ざこ の SF Tet9 吉 由 の 一
\ ヶ
2 ヽ
ST
9 の EE ま C0 J)。
98 8
TECHNOPOL15S
1 ^/「2] フ リフ J」 1-299 HUBRS1C
2 9 旧 E 2 W 上 比 ま り 0 テ
2 り DEFINTR-g :PLRY フ :CL(9)=1 :CL(1)=2:CL(2)
RBC③ ラ 6
39 COLOR フ , 9 :CLS :GDT029g
4 CULUR フ 2, 9 :CLS :X=15 :BB=9 :TR=g :SC=g :HD=9
nsTE ま (1)=" ョ ma "ETK$ ま (9)="F)1
3 和 T 愉 まま 0 に PS グ ZENPSMUECOO) う 2 NE1 う 3
569 FDRI=gTO8 :J〔( 1 )=9:IS( 1 )=9:NEXT
29 COLOR4 :FOR1=9T039 :LOCRTEI,24 :PRINT " 置 "
j:NEXT :PRINT" 田 "CHR$(15)
89 FORI=gT019:LOCRTEINT(RND( 1 )*32), 23 :PR
INT に ーー" 31NEXT
3 COLDR1 :FURI=gT0D39 :LDCRTET,4 :PRINT "て "
:NEXT :CULOR2 フ
1 9 CDULOUR フ 2, :PRINT" 田 SCURE ネネ ネネ 9 HI "5:
PRINTUSING "米村 "3HS ji
119 PRINT' TIME gg:99:g9"j:TITE$="g9:B9:
9" :GODT016g
1 29 ^ーーーーーーーー ク チ ク 電 リーーーーーーーーーーーーーーーーー
1 3 り 朋 $=INKEY$(9) :GDSUB299 :GOSUB199 :G0SUB
469 :GDSIB559 :G0SIB6g9
14 り 9 IF 朋 $="」" ND BB=g THEN POKE&HC2D, 59
:CRLL&HC25 :BB=1 :BX=X+ 1 :BY=5 :G0SUB469 :CRL
L&HC49g
159 IF 人 ="." RND BB=9 THEN POKE&HC2D, 59
:CRLL&HC25 :BB=1 :BX=X+5 :BT=5 :GDSUB469 :CRL
L&HC49
1 59 X=X+(RR$=" 団 「)-($= リ 四 「 ) :X=Xー-【X く )+(X>3
3)
129 LOCRTEX, 2:CDLOR6,9:PRINT" NNT ji:COLOR
4.53PRINTUEP ) EDLOR6」。93PRINITZ/
189 LOCRTEX, 3 :COLOR2 :PRINT" jiCOLORO, 2
*PRTNT "ーーー" j CODLODR2 9 iPRINT" 思 の):CEULOR ノ >
9 :G0UT0129
19 FOURI=1TO5:IFCHRRRCTER$(X+1,3)="UTTHE
N25gELSENEXT :RETURN
2 ^ーーーーーーーー セ - ス イィ 攻 フーーーーーーーーーーーーーーー
21 ロ T=T+1:IFT>8BTHENT=g
22 IFJ(T)=BTHENFUR 1=gT0129 :NEXT :G0T0319
23P IFJ(T)=1THENLOCRTEX(T)+1,Y(T)-1:COLO
R フ 9:LOCRTEX(T),Y(T) :S=(YT(T)-5)*19:PRINT
S :SC=SC+S :G0SUB53g :FORO0=9T08 :NEXT :LOCRTE
X(T)+1,Y(T)-2:PRINT " 回 司 還 還 還 加 還 回 田 加
回 国 "ij:J(T)=9:GOT031g
24 FURK=gT03 :C ま =CHARRCTER$(X(TJ+K,」Y(T)〕
259 IF C$=" り "17 OR C ま = リー" OR C$=" 介 "THENJ〔
T)=1 :COLDR2 :LOCRTEX(T)+1,Y(T)-2:PRINT "1 四
団 | 還 還 ーー 上 還 還 田 還 田 還 還 1 :PLRTT+C1T iB0TO
31gELSENEXT
269 LOCRTEX(T),Y(T) :PRINT"
T)+g(T)*(RND( 1)+1 )
2 フ 2 IF %(T)<g OR %(T)>35 THEN J(T)=9:G0T
D 31g
28g9 LOCRTEXT)。Y(TJ:TFgCT)=1THENCOLOR/。 り
*PREINT "Fi:COLDRC(T) :PRKINT 「 甘 議 に :GOUTOU399
2 COLORC(1),9:PRINT「 項 議 ):COLOR フ EPRINT
3 11 8
3g9 IF RND(1)>T(T)Z39 GOSHB439
31 攻 ^ーーーーーーー ES 025 NN NN、 思う で マイ SR
31X( 1 = ミ X【
66
32g IF J(T〕)=g RND RND(1) く <.5 THEN 339 ELS
尽 3SM
339 U り =RND( 1)*3:C(T )=CL(U) :〆=RND( 1 ) : ミ = メン
: マ = ニ メ ー1 : ざ (1 =:T(T)=RND( 1 ) ネ 14+ ノ
34 り J(]T)=2:IF ミ =-1THENX( 1 )=35SELSEX(T )=
359 =F1+ 1 :IFFT=STHENF1= り
369 IF IHS(H)=9 THEN FORI=9T019:NEXT :GOTO
41 り
329 ^ーーーーーーーー キ ライ イト" ウーーーーーーーーーーーーーー
389 LOCRTEHX(H),HYCH) :PRINT" "jiHY(T)=RY
CH)-1:IFHY(H)=3THENLOCRTEX(H) ,HY(P)+1:C
0LOR1,9:PRINT "一 " j:GOT0429
399 IF HY(H)=2 THEN PS(H)=9:GOT0O 419
499 COLOR6, 9:LOCRTEIX(H),HY(H) :PRINT"*"
41 RETURN
429 COLOR2,9:LOCRTEHX(H), THYCT) iPRINT"U"
:BEEP1 :BEEP9 :RETURN
43 ーーーーーーーーー キ ラ イ ji) ッ セ イーーーーーーーーーーーー
449 FORI=gT04 :IFHS(1)=gTHENHS〔 1)=1:HX(1)
=X(T)+2:HY(T)=Y(T)-1:RETURNELSENEXT
459 RETURN
469 ^-ーーーー 2 パネ チッ クロ " ク が フーーーーーーーーー
429 IF BB=9 THEN FORI=9TO05g :NEXT :RETURN
489 LOCRTEBX, BY :PRINT" "jiBY=BY+]
499 E$=CHARRCTER$(BX, BY ) :COLOR6, 9
599 IFE$=" 独 "ORE$=" 較 "DRE$="" DRE$=". "DRE き
=". "DRE$= リ ="THENPOKE&HCZD, 19 :CRLL&HC25 :B
B= り :LOCRTEBX, BY :PRINT "借り:CRLL&HC49 :RETH
RN 「
519 IF BY=22 THEN BB=:RETURN
52g LOCRTEBX, BY :PRINT" 生 "RETHRN
53@ ^ーーーーーーーーー ス ] ア ヒ ヨ 2 "ーーーーーーーーーーー
54g COLOR2, 9 :LUCRTE フ , 9 :PRINTUS 1NG "村人
SCi:RETURN
559 ^ーーーーーーーーーー ヲ ー イ ーーーーーーーーーーーーーーーーーーー
569 IF SC>5999 RND HD=9 THEN T1HE$="99:9
9 :99" :BEEP :HD=1
529 COLOR2,9:LOCRTE29,9:PRINTTITHE$:
58g IFTIHE$> "99 :92 :59"THEN259
599 RETURN
699 ^ーーーーーーーーーーー ヲ コーーーーーーーーーーーーーーーーーーーー
619 IF TR=9 THEN FOR1=gTO129 :NEXT :GOTO68
9
62g FORL=g1T02 :H$(L)=CHARRCTER$(TX+L」 TTY) :
日 $=H$(L ) : IFH$=" 介 "DRH$="1 "ORH$="ー" THEN2 フ 19
ELSENEXT
639 LOCRTETX, TY :PRINT"
還 ":
64g TX=TX+T ミ :IF TX<9 OR TX>32 THEN TR=9:
RETURN
659 Q=Q+1 : ロ =Q+(Q=2)+(Q=2) :POKE&HC2D, FU(G
) :C8LL&HC25
669 COLOR2, 9 :LOCRTETX, TY :PRINT" 作 5 :COLDR
6, 2:PRINT "="j:COLOR2,9:PRINT " 箇 還 回 回 回 "
629 COLOR5, 2 :PRINTTE*$(Q) "回 回 " j :COLOR2,
9 :PRINT" 穫 「) :COLOR フ 2:PRINT!0@「) :COLOR2」
9 :PRINT ' 還 回 E②" )TK$(Q) ji:CRLL&HC49 :RETURN
68g IF RND〔1) く <.11HEN TR=1 :※=RND〔 1 ) : ミ = ミネ 2
:T ミ = ミー1 :1Y=RND( 1 )*8+19:ELSE RETHRN
699 IF 1 ミ =-1 THEN TX=36 ELSE TX=g
299 RETURN
団 団 回 回 団 回 回 加 団
ノ 19 FORI=gT019:FORU=gT01 :COLOR9, 6 :LOUCRTE
TX ITT:PRINT 軌間 加 回 回 困 " TE$( 晶 ) :
229 PRINT "回 司 国内 0 回 回 還 ") :CODLOR6,9:PRINTTK
$( 昌 ] jjPLRT フ リーEg" ENEXT :NEXT :CULOR フ
239 LOCRTETX,」TY+1 :PRINT "599" :SC=SC+599 :G
USUBS39 LOCRIETKA TTPRINT" 団 回 回 回 国 団 回 回
国 団 回 回
1 es
う
24g 1=g:RETURN
ノ っ P
ノ
ノ
了
9
9
9
9
9
8 っ P
86 り
9 ノ ゆ
一 変数 リス ト
SO…… ス コア ・ J( )…: 潜 水 編 フラ ブ
TA…… タ コ フ ラ グ ・ X( )…… 浴 水 艦 X 座 禁
TX…… タ コ X 秦 標 ・ Y( )…: 洪 水 艦 Y 座 標
TY…… タ コ Y 座 標 ・ MS( )… 雷 フ ラブ
BB…… マ ブ ネ チッ ン 爆 弾 フ ラ : MX( )… 機 電 X 座 標
グ ・ MY( )…… 機 雷 Y 座 禁
BX…… マ ブ ネ チッ ン 爆 弾 X 座 ・ プ ロブ ラム の 説明
標 ・ 10110 初期 設定
ーーーーーーーーー Ns: 発
69 COLOR2Z:LOCATE19, フ :PRINT"
E_R ":PLAY"-D3"
29 LOCRTE11,9:PRINT"
SC>HS THEN HS=SC
89 IFINKEY$=" "THEN3gELSE289
9g <
9 CONSOLE1 , 23, 4 , 36 :CODLUR2, g
ESDINI | | | 症 是 邊 | 出
2Z9 PRINI" _ 血 | 回 較 較 半 較 較 還 時 上
39 PRINT" 企
49 PRIN1"
PRIN1"
PR1NT"
PRINT"
ほ 符 NN 世 0 WU
生ま た 江 あお に 骨 EE : 肖 必 Y "S1 だ
回 回 回 回 間 間 半生 凍
「「| 較 | | | 還 | 間 較 還 較 韻
|「| | 回 | 較 軒 男 | 四 3
加 間 間 回 間 回 回 間 還 還 回
| | | 較 | 還 軒 較 ! 半 較 男 。 II
: BY…… マ プ ネ チッ フ 和 爆弾 Y 座 :
… 駆 有 艦 X 座 標 標
今 まで こ は ち よっ と 違う 。 いきなり こん な と ころ で
予告 を 出し ちゃ う の も どう か と 思う けれ ど 、 と に か ご
も は や 次 号 の 発売 日 が 決ま つて いる の だ /
ショー ト ・ プ ログ ラム 満載 、 派 削 教 室 は 今 まで と 同
じ だ けれ ご ど 、 読 者 の ペー ジ や 欄外 情報 も 入れ ちゃ う ぞ 。
それ ガ ら 、 あ の で 大 先生 の 特別 企画 も 深く 静か に 進
行 中 。 こ と に か ガ こ ご 、 今 まで より 以上 に 楽し い 雑 誌 に な る
は ず だ か ら 、 ぜ ひ 期 待 し て て ね 。
掲載 プロ ブラム の 選考 も は じ ま つ た ば か り 、 今 な ら
まだ ま に あ う から ど ん どん 応募 し て ね 。 お 便り や 意見
も どしどし 送 つ て ほし い の だ 。 ヨロ シク 。
プロ グラ ム ポ シェット VolI.5
ご こっ さり の 1 画面 < ショート プロ グラ ム に
キミ の お 便り も 仲間 入り させ ちゃ う ぞ /
サラ ダ の 国 の トマ ト 姫 つ ハ ドン ソン フト ( 信 011-821-1538) へ X 1 (C, D) ・PC-8801 ン 9801・FM- 7・S 1 〇 テー プ *\4.800. デ
ラル イス ク Y6.800 (PC-9801 は ディ スク 版 の み ) @ サ ラダ 国王 女 ト マト 姫 を キ コ ウリ 戦士 と な つて 救う アド ベン チャ ー。
の どど だ 3A7
の と /7 了 7 だ
CULURS,
SINIEMI | | 関 時 間 半 | 還 較 | 」 敵 |
PRKINT) 男 因 回 回 半 閉 固 開 回 還 男
PRKINT | 男 回 回 回 且 回 較 較 。 因 回 回
CULOR 1 , り :PR1IN] 加古 問 回 男 硬 介 舌 凍 午 各 重税 穫 半生 半
回 。 回 量 各 較
PRINT 生還 問 較 回 較
PRIN] 「 罰 醒 諾 回 副 向
PRTNT 回 回 回 回 間 回 加 間 加 還 重 回 間 四
1i |
6 も OUELOR ウ 3PRINTSPECS ナ 7 回 [e]。。 上 まき ] 。、。 SF
PP MEY
9/M に RINESPEES)/ | し に し 1 。、。 BBN"
9336 (PRINTSPEC 1 は 2))『 国 7T RY KEYYi
239 CDNSULE9g,25 , 9, 4g :COLORZ,」 ロ
1999 PLRT2, "6G5RBG3R2BG3RBG8R3#556#G5RBG5R
り G3R92G3R9G8R365RB+C ヨ "
191 り 9 ]FINKET$=" "THEN1g1P
1929 FORI=g9T015:LOCRTE9, 19 :PRINTCHR$( 1 4,
15Jj:NEXT :CUNSOLEB, 25, 9, 4 :GUT04g
120-190 駆逐 角 : 790-1020 タイ トル
・ 200-300 洪水 艦 移 動 ・ 圏 チ エッ ツ フ クボ イ ント
・ 310360 浴 水 艦 発生 ・ 普通 の 潜水艦 ゲ ー ム ハム で す が 、-
・ 370420 機雷 秘 動 ・ 時 々 横切る 大 ザコ が 、 と て も い
: 430-450 機雷 発生 ・ い 。 5000 点 を 越え る と 、 タ イハ
: 460-520 マ プ ネ チッ ンク 爆弾 : が O に も どっ つて これ ます 。 そ の
・ 530-540 スコ ア 表 示 ・ た め に は 、 馬 肥 艦 に か まわ ず 、
・ 550-590 マイ ム ハ ・ 大 ダコ を 、 ね ら う こと 。 災 バッ
・ 600-740 タコ ・ チリ 賞 。
・750-780 ゲー ム オ ー バ ー :
6Z
空 ///- ジ ル @
mW
遊び 方
某 研 究 所 の 邪魔 田 博士 が 発明 し た 、
頭 の よく な る 薬 「 シ ナ デ ク ロー ム 」( 化
SRNRDECHRO ひ ME SECRET
JRR ひ OO 欠 う
、 SVRDECHROIE 年 クズ サラ ミ う 今 。
さす くま 分 ラ
YO ほす RGO ひ OR^ ュ > 人 は タッ ジウ ュ ラウ そ やう 。
3 多 G 〇 の こき ゝ
CTURE 、 所 欠 CE ,。 BESK , SFE , 多
C ひ の 計 財 人 稚 プ 化
、 了 サマ メラ
4 と こり あえぎ ず 繧 を 見 て みよ う 。
NR
り ン 汐 必 つら で べ ので
Piyo em 上
SB) 入っ 0 |
リア
am
| OTD う 9c ウ NTT プリ 9
< の ー の と の 9 ひみ 販 は へ 釣
_
の の コー ト 鐘 吾 当 ゆ 」9wSSt 。 中 回 河
せこ 上 の て 滑 局 は S ひ と rr 「 ず 4OSAS |
し っ 栖 Tdhnoo こ き さ ボ
NANASNKSSSNNNNNNNNNNNNNNNNNNNNNNNN
上 ・ 120-130
A や ( ) cite 0
BS( )… 9 ・ 140-190
MS$( ).NS( )…… メ ッ セ ー ジ : 200-690
C$…… 入 力 コ マン ド ・700
一 プロ ブラ ム の 説明 ・ 710-720
10110 初期 設定 ・730-810
6 ぎ
mW
USE と MOVE を 使う 。 首 尾 よ く 使 命
を 上 果して 脱出 で きる か な 7?
文 参考 「RAM Pack NO.6 for FM-
7 グー ムラ イア ラリ
学 式 UsS04PPo21s、 別名 ウソ ッ ポ イ )
を 探し 出し 脱出 せよ /
重 質 計 寺 ス ペー ス 1 個 十 名
SVYHRDECHROHME SECRET
詞 の 入力 で 、 こ の 部 屋 か ら
錠剤 「 シ ナダ クロ ー ム 」 と リョ クッ 、 3 っ ジュ ラ セ コ 。
出口 を 見 つけ た だ たら 、“OUT P PRRCK ,。 DESK 。 SAFE , が"、? け マス ヨ
ROOM と 入力 し て あがり 0。 Ra 3910
う マット RRCK
OPEN DESK
? 業
や め る と き は |Fe
基本 的 な 動詞 は | Fl に -|F5 |
に 人 つの で UO7 。 を なの) は ほか いし
P
て
ゴ
て
ォ
て
ひ
て
マテ クノ ポリ ス を 読も うと
し たら N O / と 断 わ ら れ て
SYNnRDECHROME SECRET
1
ミ 還 今 、
お カラ 、 SYHRDECHROHE トイ ウ の クス リラ
な の 話 < "ジラ ュ ラ セ ヨ 。
を 。 ニュ ウサ ョ ワラ ジュ
,。 DESK , SRFE , お )、 了 アリ マメ ヨ 。
で は テテ
』 ズミ
HHND2 OPEN
な
bESK
DE SK
oe
OO し まま >
ア 才
TRKE MHRGRZ INE
ソン い > IO の 3
和合 D HGRZ INE
oriO ズ や の
の
人 て < りり た
LO
ま ら
に コ
コ
コ
P
ゴナ
6
o
K
D
C
6
e
T
ド
て うと
の い の
ファ ン フ ション キー : 皿 チ ェ エッ ツ フ ポイント SG し まう 。 と こき 0 の グ
の 設定 と 内 容 表示 ・ ミニ アド ベン チャ ー ゲ ー ム で ・ 一 ム の 最短 の 舎 え は 、16 ま で で
コマ ンド 入力 、 判 断 ・ な か な ガ 楽 し め ま す 。 こ の ゲー ・ きる そう で す 。 が ん ば つて ぐだ
各 コ マン ド へ の 対応 ・ ム に 、 物 足り な い 人 は 、DATA : ざい 。 災 バ パッ チリ 賞 。
暗号 入力 、 判定 ・ 文 等 を 自分 で 改造 し て 、 自 分 の :
OK,NO の 表示 ・ オリ ジ ナ ル の と に ベ ペン チャ ー グ
ゲー ム オ ー バ リー ・ 一 を 作 つ て みて も 、 お も し ろ ・
SYNADECHROME SECRET
19 FOR 1=9 TO 19:RERD $(TJ)。B ま (1 ) :NEXT :F
OR 1=9 TO 18:READ H$(1),N$(1) :NEXT
29 DRTRPICTURE , TRKE,NOTE , USE , PRPER, OPEN,
RCK, RERD,DESK,LOOK, SRFE, HOUE , KEY, BRERK,
HGINE , SRY,DRIUER, ERT, TRBLET , BURN, TECH
NOPOL IS, OUT
39 DATA" が" 7 ルリ リリ サス 。 リ "の" オチ ク 。 " 」 フ ウ ウ
グ モノ , ネ が トメ サル レル テ 了 アサ ナイ 。 カミ セイ 。 スチ" こ 了 アイ テル 。 。 モク
キノ 「SYNRDECHROHE」, カキ * 用 "カッ タテ イル 。 」 "ヤッ ク 9 9
49 DRTR 「 了 アフ] ゞ 2、 [ 」 力 " 、 ア ラ ワ レ 9 。] 2 タバコ ト 、 用 カレ テイ
ル 。 , ウ ]Y ナイ 。。 フラ キナ] トニ 、、。 テバ クチ" 1、 キ エ テ ジ フッ ク 9 "
ぅ ル ノ ロ ヨク ナイ コト テス ヨ 。 。 コノ 、, オ エ ーッ 9 コラ ラ コワ フラ 29,
"nn、9 イ ]299"」22- ッ 9 XX フル 2!
59 DRTR9, 3, 4 , 5
59 DRTR TRKE, OPEN, RERD,LOOK, OUT
29 DRTR LIST,RUTO, RENUH, COLOR, CHR$(
89 CONSOLE9, 25, 9, 4 の ゆ :CDLOR2, 9 :CLS :PRINT, "
SYNRDECHROHE SECRETED"
39 COLOR5 :PRINT" ] ノ RODOH カラ 、SYNRDECHROIE
トイ ウ クス リラ ミウ リ 、 コノ Q ヤ カラ 0UT RODOH/ ト - ュ ウリ
ョ クリ 、 2 バッ フュ リセ ヨ 。 男 "
199 PLRY6,"C3EGEFR+CRB+D+F+D+C+D+E5C3EGE
FR+CRB+D+F+D+E+D+C5"
119 COLOR6 :PRINT "コノ ROOT こい 、" :FOR 1=1 TO
4 :RERD R:PRINTR$(R)" 」。 "ji:NEXT :PRINT "用
、 ア リフ 2 ヨ 。 "
128 COLOR 8,2:FOR 1=1 TO 5:RERD FC$:KEY
IFC$+" "iLDCRTE IT*8-8, 23 :PRINTUSING"&
& "FC$」:NEXT
138 KEY 6,CHR$(4,4,34)+"FKEYINIT"+CHR$(1
3) :F6=19
159 PLRY2,"+B" :CODLUDR2:INPUT "CDNHHRND" jC$
:S=INSTR(C$," "):IF S THEN B$=LEFT$(C$,S
ー1 〕) : 朋 ま =RTGHT$(C$,LEN(C$)-S〕) ELSE 15p
169 IF LEFT$(C$,3)=B$(19) THEN B=19:GOTO
18 り
129 B=9:REPERT :1F B$(B) く <>B$ THEN B=B+1 :L
NTIL(B>19) :PRINT "トド ウフ カリ" j ド "NELSE R=g
:RKEPERT :IF $(R) く <>R$ THEN =R+1 :HNTIL(R>
19J iPRINT リ メッ イジ お" "ji"N"
189 COLOR3 :FL=g
199 ON B GOTO 289, 319, 329, 4 19, 559, 539, 6 1
9,63g,649,659
299 IF =g GOTO 239
219 IF(R=1)*(F1=1) THEN F1=2:"0
229 IF(R=2)*X(F1=3) THEN F1=4:"O
239 IF(R=6)*(F2=1 ) THEN F2=2:"D
249 IF(R=2)*(F3=1 ) THEN F3=2:"D
259 IF(R=8)*(F4=1) THEN F4=2:"DO
269 IF(R=9)X(F5=1 ) THEN F5=2:"D
22g "N 「
289 IF(R=6)*(F2=2) THEN F2=3:"0
299 IF(R=8)*(F4=2) THEN F4=3:"DO
3g9 "N
31g IF(R=1)*※(F1=2〕 THEN F1=3:PRINTR$(2)
$(1):GOTO 1589
329 IF =3 THEN IF F4=3 THEN F4=4 :F2=1 :
0" ELSE "PRINTH$(3+(F4 く <4)) :GOTOD 159
339 IF 有朋 =4 THEN IF F3=9 THEN F3=1 :F4=1:"
0" ELSE PRINTH$(3) :GOTO 159
349 IF =5 THEN IF F2=3 THEN F2=4 :F5=1 :G
DOT0 299 ELSE PRINTH$(4+(F2=4 ) ) :GOTOD 159
359 IF((R= フ )+(=19))*(F3=2) THEN F3=3:"D
369 "N
329 IF(R=1)*(F1>2) THEN PRINT "フッ 3 ロリ スズ "
:GOTO 158
389 1F(R=2)*(F1=4) THEN F1=5:F6=INT(RND*
19) :PRINTM$(5)$(F6)N$(6) :COLOR2 :PRINTN$
(2)R$(2)M$(8) :GOTO 159
339 1]F((R=2)+(R=1g) )*(F3=3) THEN COLOR6 :
PRINTN$(9)R$(19)M$(19) :GOTO 15g
499 "N
419 1F =9 THEN PRINTH$(9)$(91H$(19) :GO
T0159
429 IF(R=1 )*F1 THEN PRINTN$(2)N$(9) :GOTO
159 '
439 IF (R=2)*(F1=4) THEN PRINTN$(2)N$(8〕
:GOT0 159
449 1F(R=3)*(F2=1 ) THEN PRINTR$(6)H$(9) :
GOTQ 1589
459 IFKR=4)*(F1 く 2) THEN PRINTR$( 1)M$(9) :
F 1=1 :FL=1
469 IF(R=4)*(F3=1 ) THEN PRINTA$( フ )M$(9) :
FL=1
429 IF(R=4)*(F4=1 ) THEN PRINTR$(8)H$(9) :
FL=1
489 IF(R=2)*(F3> 1 ) THEN PRINTR$(19)N$( り )
:FL=1
499 IF FL=1、GOTO 159
99 1F(R=S)*(F2=4)※(F5<2) THEN F5=1 :PRIN
TR$(9)$(9) :BOTO 159
1 IF(R=2 フ )*(F3=3) THEN PRINTR$(19)N$(9)
:GOTO 15g
529 IF(RA=9)*〔F5=2) THEN COLOR6 :PRINTN$(3
)N$(9) :GOT0D 159
53g IF(R=19)*(F3=3) THEN COLODR2 :PRINT "エッ
9? 7 ナグ " 朋 $(19)" ヲ う ラ ナイ ノ ?2?" :GDTU 159
549 PRINTN$( 1 )N$(g) :GDTO 158
559 IF =g GOTO 23g
569 IF =3 THEN IF F2 THEN F フ =9:"0" ELSE
F2=1 :COLOR6 :PRINTN$( 4 )N$(〔 フ )N$(5) :GODT015
9
52g IF(R=4)+(R=5) THEN COLOR2 :PRINTN$(6)
:GOTO 159
589 "N
599 IF =5 GOTO 2398
699 COLOR2 :PR1INTB$(6)N$(8〕) :GOTOD 159g
61g IF 本 =19 THEN COLOR6 :PRINT" ェ ライ 9 " :GOTO
159
629 "0
639 COLOR2 :PRINTN$() :PLRY 2 フ ,"-Cg-E-6G-BC
":GOUTO 259
649 COLOR2:PRINTN$(19) :PLRY 2, "CODCECFCG
CRCGCFCECDC" :GDTO 259
659 1]F F2=g 1HEN COLDR2 :PRINT" テ "グチ 用 ナ
イィ イッ 9" :GDTO 159
66g IF FS<>2 THEN BEEP :BEEP :BEEP :CULOR2 :
PR TINT "ラッ 9 - フ Z ヲ ワウ スル ルナ 9" :GOTO 25p
629 PLRTY 2 フ ,"+C5+E+D+F+E+D3+C+D フ ォ E5+C+DB+
CR3B+C フ "
589 COLOR6 :CLS :PRTINT" オメ テツ トウ 9 アナ タラ 」]、 キ チ フ ト
> ス 24] め に 、 2 バッ ジュ リー - モ セイ ] ウ ヲ オ サ
タク 。 オメ テト ウ 。 ゴク ヤッ ク ネ ! ユラ イ
639 COLOR2:PRIN1 "回 回 PRESS [F6] KEY" :END
289 COLOR6 : INPUT "アフ ] ヾ ウ ラ イル ヨ " iP :1F(P ま =R
$(F6))*(F6<>19) GOSUB"0" ELSE 23g
219 LABEL"0" :COLORS5 :PRINT "OK" :RETURN 15
9
229 LRBEL"N" :COLOR2 :PRINT"N09" :PLRY6」 "ー 有
5" :RETURN 158
239 COLOR2 :PRINT " ま " ウ フソウ チ "2 ライ 29 "
249 FOR 1=1 TO 29:BEEP :NEXT
259 COLOR2:PRINT "GRTE OUER9" :PLRY6,"+C5G
3+CB5#F 3BRSE3GED1EC2 フ "
269 PRUSE 19:PRINT"PRESS S KEY":
229 IF INKEY$( 1 )="S" RUN ELSE 2 フ 2g
289 LABEL"FKEYIN1T"
239 RES10RE 29:FOR 1=2 TO 6:RERD FC$:KEY
1,FC$ :NEXT
899 KEY1,"RUN"+CHR$(13)
819 CLS:PRINT "GO0D BYE9" :END
829 ^ THE EASIEST DUENTURE GAHE??
839 ^ BY T.MRTRNRBE , , , DECHN0-SOFT 84
849 ^ UERSION 1.3 ン ノン 1984 和 5 月 8BH
ガッ ツン エニ ックス (会 03-366-4345) X 1 (C, D) 要 G-RAM ひ テー プ \3.,600 旬 ス フロ ー ル する 244 段 の 六 庫 の な か を
動き まま わ つ て 果物 を すべ て 取る ゲー ム 。 エ レベ ー タ を 利用 し た り 、 銅 鍵 を 落と し て 敵 を や つつ け だ り の 新型 リ ワ フルタ イム 。
ルク
WW
靖 UUUUMM
W
靖 UM
文 参考 「 面 白 パ ズル ブッ ク 」 7 号 、『 シ
mm デイ ング ャ スタ ダー ュ
角 の 4 マス 、[2、 [4、 |6、 |8|! は それ ぞ
れ の 辺 の 3 マス 、 5 は [5] を 中 心 に し た
十字 の 部 分 が 反転 する 。 こ の 組み 合わ
へ せ で あがり の 形 に 持っ て い 〈 く の だ 。
[人 <) 遊び 方 エディ イッ ト す る と き は テン ・ キ ー で
右 下 の 写 真 の よう に な れ ば あがり と カー ソル を 動か し 、[ が ON、 図 が O
(ラフ パ スル 。 シシ クシ ルル だ けど 、 人 な か な FEF、 で きた ら 国 を 押す こと 。 PROGRANME
か お も しろい ぞ 。 その うえ 、 自 分 で 問 II
題 が 作れ る エディ イッ ト 機 能 付 きだ 。 つい に 完成 。 画 面 下 で キミ の だ め に
キー の 使い 方 が ちょ っ と や や こし ぃ 。 バン ザイ レ て ぐれ る の だ 。
テン ・ キ ー と 画面 の マス 目 は 対応 し て
いて 、 そ れ ぞ れ の キー を 押す と その キ
ー の 位置 を 中 心 に し た 数 マス が 反転 す
る の だ 。 1 3 [7 |99 は それ ぞ れ の
AO 対 村 議 。 叶 ペー
NIS ロー 且 mmS 壮 の 等 開く 』
。H 時 S 柄 間 泌 ツル |
. つら らい 一 い 受 ピ デコ ヨー の の の 一 の て 証 |
N 替 ノ へ 符 プ へ 和夫 プ へ 参 ノ
も \
ま
せ
ん
ン
品
タ
ム
人
に
人
用
し
て
る
ノヽ ノノ トブ ヽ
AJ 溢 きこ 生 ビ ー さ と C 品 叶 スピ の の |
の ー の で て 宮藤 臣 の
画 変 数 リス ト ・ TES…… 手 数 の カウ ンタ ー ・1440 手数 ・。 と ころ で 、 バ ン ザ イ が 終わ る
OE( )…… 問 題 の パタ ー ン ・ SX.SY…… ど こ か ら 反 転 や : 1450-1770 ゲー ム オ ー ル バー 処 ・ と すぐ メニ ュー に も どっ つて し ま
AN( )…… 答 の パタ ー ン ・ IXJIY…… 反 転 の 方 向 ・ 理 ・ いま す 。 そ ご こ で 、1660 行 の GO
NO( )-…… 現 在 の / パ ツー ン : 硬 プ ロブ ラ ム の 説明 ・ 弄 チェッ フ ボイン ト ・ TO110 を 消去 し 、
RA$( )…… ラ ンプ の パ マ ターン ・ 60-160 初期 設定 ・ ちよ っ と 変わ つっ た パズル ゲー ・ 1665 GETMSIFMS=` ?
MES( )…- メ ッ セ ー ジ の バタ : 170-200 問題 作成 (MZ) = : ム で 、 つ いつ い 熟 中 し て し まい : THENGOTO110
5 ・ 210-320 問題 作成 ・ ま す 。 自分 で パタ ー ン を 作れ る ・ 1667 GOTO1665
A$…… メ ニコ ー の 内 容 ・ 1000-1220 画面 表示 : の で 、 同 じ パ ター ンカ ら 何で ・ に する と 、 スペ ー ス キー で メニ
X.Y…… カ ー ソ ル の 位置 ・ 1230-1290 HOLD UP ・ あ が れる か 、 競 争 し て も お も し : ユー に も どる よう に な り ま す 。
XV,YV…… カ ー ソ ル の 物 動 _: 1300<1430 キー 入力 ・ ろ いと 思い ます 。 ・ バ ッ チリ 賞 。
7 ひ
た ー"
sr うー-』 う ISIIWEN 本 OSN0O 9//【
ILXJHN:,9d+91,。 う IS 人 IM ET LXHN:(( セ ※(1)dNd) LN IT )$1S+(G9+(/※(T)dNd) LN1 )$dHO+, 六
+。 う ISIIMNEE(TF/(T)$ ヨ N)$dIM INIdd:<xI'F 0ST1O:((T)$ ヨ WM)Nd ヨ TOLT=Pd0d: TO0L9=Id0d 99/1
90dMdL :ddTIOSNOO 2 と た (そく 手 と た と ュ + す (8/)$dHO+( G8 ) $HO+ (9 )$dHO+,、 ビ /4 た =(T)$ ヨ N 9G/I
"信人 と と 4 、F GT 、(C(0 オ ーー1F> キ 、 る 4 る 4 ルー 。+( 8 )$dHO+( G8 )$JHO+(Z8 )$HHO+、 ビ と と 、 人 =(9)$dN 9 も /【
5 9[/[ OILOD 9E/【
9 も ヤ /1 NHHL 人 ,=$V [| 9Z/【
9II NdHJ ,N,.=$V 』1:$V IdD 9IZI
ぃ [ON/ 5S9 和 AA] 6 と Z た (tf ニ が AE ニ 1 へ 半 品 。 LN1dd 909/1!
くく くく く へ そ - 必 NH >>>>> Add 669【
IL OLOD:,9dEO9O9d09H9d09O TO9dZdH9d09 つ OiISfIW: ILXHN 9991
ます キョ TSIIWMI 4 IVZNVH ささ マ パプ アダ エイ ENIGH g981
ぃ o と 、4 へ 、M へ 馬 / い 馬 いい 還 還 , LN1dd 9 も 91
ヵ 1 IVZNVd O O O O 。LNIdd:6I'9 dOSdI1O 9E9I
sm うう ISfINEi。 ナチ 、A く AM ヘン NN ヘン へ ENIdd 9Z91
ぃ 1 IVZNVd EN 問 LNIdd 9I9I
の 全 の 全 、 / 全 、 全 N,LNIHdE61 "9 OSdI1O 9991
GO0t9=1dOH: ヤ 0dAHL 96G【I
くく くく く と 4 へ 、M >>>> AdHd 68GI
9ICI NdHL 6>02 』I:IFP TXHN 99GI
L+09=OONHHL(I*P)NV=(ITP)ONd1:EOLT=Pd0d:EOL1=180d: 9=02 9G セ 1
くく くく く へ 、4 へ WV >>>>> AH 6 も ヤ [
ぃ )$LHD1Id LNIdd:E* ヤ < 0SJI1O : 【+SdL=S ヨ HL 9? ヤ 【
くく くく く 6@ と モー > うう >> HH 6E ャ 1
1 IXHN::((T と)ON)$VdLNIdd:G-IX9*/ 0S1O:T+(T" く )ON-=( 1 と )ON :ZddLSEOLT=1d0d 9E ャ 1
ILXHN::(( と "IT)ON)$VJLNIdd:/'G-Ix9 0SdI1O:1+(Z"T)ON-=(Z* IT)ON:EOLT=1d0d 9Z セ 1
くく くく < くく ロ E+1 /Z G >>>>> WMdd 6I ヤ 1
9g? ヤ [ OLODEE((T+AS! T+XS)ON
)$VdLN1Idd:T+ASX9* TI+XSx9 dOSdI1O::((T+AS*XS)ON )$VJLNIdd: 1+ASX9'G-XSx9 0SJIIO 8I ヤ 1
・((AS'【+XS)
s ら 6 と 4 へ 、VM
・(E "(SdL)$dLS+,
ON )$VJINIHd:G-ASx9*'[+XSx9 0SaO::((AS*XS)ON)$VJLNIdd:G-ASx9'G-XSx9 OSHO 99 セ 1
[+([+AS'T+XS)ON-=(【+AS* TI+XS)ON:【+
(【+AS "XSDON-=(T+AS XS)ON:T+(AS*T+XS)ON-=(AS'T+XS)ON: [+(AS'XS)ON-=(AS*XS)ON 96EI
と =AS: て =XS 98EI
96EI OLOD:Z=AS:I=XS 9/EI
96EI OLOD:T=AS:Z=XS 99EI
96ET OILOD:T=AS:[=XS 9GEI
くく < く << く ET176*/ >>>>> Add 6 も EI
9 ヤセ TOLOD: ILXHN::((Ad'Xd)ON )$VJLN Id :
G-Adx9'G-XdX9d0SJI1O:【+(Ad'Xd)ON-=(Ad'Xd)ON: IXAI+AS= 和 Ad : 1XXI+XS=Xd:COL9=Id0d 9 も EI
9=AI:I=XI:I=AS:I=XS 9EEI
9?CI OLOD:I=AIE9=XI:1=AS:E=XS 9ZEI
9?CI OLOD:T=AIE9=XI:1=AS:T=XS 9IEI
9?E1 OLOD:9=AI:I=XIEE=AS:T=XS 99EI
くく < く < くく 9 9? ヤ "Z >>>>> Add 66ZI
98 と I OLOD 96ZI
9II'999I OILOD V NO:V 35 99Z【
sn11A [と] 0O [Ii] HSII
d ぃ LNIdd: 2 作 、1 キ ニ - と て ニ Z と LNIdd:」 244 と と 、 々 へ 二 / ビ ヒー 、4 手 と GLNIdd:9Z "IdO0SATO 9ZZ1
9 も と 【 OLOD 99Z【
9/ と TOLOD( 入 ,=$V ) -NO 9GZI
91ZI OLOD::(9)$ ヨ NLNIdd:/ "1Z 05dIHO_ NHL (ET)$ ヨ HO=$V 』】:$V 1 ヨ D 9 も ZI
:(【T)$ ヨ WM TNIdd:/"【Z 0SMnO 9EZ【
くく くく く IF1 / + >>>>> MMHd 6ZZ【[
9IZ[ OLOD:99E['9EEI'9GEI'9ZEI'9C も [9IEI*9
8EI'99ET'9/EI "9IZI"9IZT'9IZI'9IZI'9IZI'95ZT OLOD <? ヤ -($V)OSV NO: 9 り #+, つ ISIIN 9ZZ1
91CI NdHLi =$V 』1:$V LHD 91IZI
SdLLNIdd:E'GZd0SIO : ,#+ う -』 う IS : 1*PLX ヨ N :!(( 1
"TP )ON)$VaLNIdd:G-1x9*G-Px90SIO: (TP)O=(T*P)ON:EOLI=PHOd:EOLT=IOd: 9=S ヨ HL 99ZI
:(9)$ ヨ MLNIdd:/* Td0SI う : , ーーーーーーーーーーーーーーーー コ レーーーーー エ ーーーーーーーーーー コ 』 LNIHd 96II
ぃ ーー 一 葛 * NdTJOM "1 | 1。 LNIJd 991I
ぃ | レーーーーー ヨ MVJD0dd1 1 1 INIdd 99II
el | 1。 LNIdd 9GII
al "うつ *2*I*A 條 | 1, LNIdd 9?1{【
6 | 1。 INIdd 9EII
| ーーーーーー* 1 。 INIdd 9ZI【
ad | | 1。 LNIdd 9III
1 | | 1。 LNIJd 991II
| | 1。 LNIdd 969I
| | |
| | |
|
|
|
|
|
|
LU | 山 LN Id 9989【
。 LNIdd 9/9!
n LNIdd 9991I
ぃ 。 LNIdd 9G9I
。 LNIdd 9?9【
ぃ 。 LNIdd 9E9【
時 時
p |
山 | デ テ 1
s| 11 と 、 そ が | 「 み ル
ぃ | で ーー タ ぃ 。 LNIdd 9Z91
p | の 天 り ど 衣 人 。 LNIdd 9191
ぃ ーーーーーーーーーーーーー プ ーーーーー エ ーーーーーーーーーー」 すき 。LNIHd 999【
くく くく く へ を - 人 4 スル と だ >>>>> MAHH 666
Nd1Ldd:i 1。O。LNTIdd: 1+Z※ 人 *" [+CXX OSJI1O 9ZE
NdI1LdHdiE。 人 LNIdd iT+C※A* 1+ZCxX 0SI1O 9IE
9 も と 0LO0D: IE。 尊 LNIdd:T+ZXA' 1+ZXX OSJI1O 89 と
999[ OLOD ( 誤 =$V)- NO 96Z
9=(【+A"T+X)d6:9ZEdIISOD _ NHL ,X』=$V 』dI 98Z
96C OLOD:T=(T+A'T+X) ヨ O:9IE ヨ ISOD NHL ,Z,=$V 1I 9/Z
( と く A 和 A+ 人 人 )+( 9>A 人 人 + 人 ) 人 人 + 人
= 人 人: ( とく AX+X ) +( 9 >AX+X ) ーAX+X=X : ( un て =$V ) -( 98, =$V ) =AA: ( sn9。=$V ) -( / =$V ) =AX :$VLHD 9
9IE IISOD 9GZ
99Z OLOD: 9ZEd(ISOD NdHL9=(T+A* 1+X )dO JI Et 閣 LNIHd:T+ と CXA*T+CXX OSI う 9 も と
5 に T Te 4 1] IOIO1IOI 6 2 1 トー キー オー+ ii IOIO1OI 1」 2 トー キー キー ゴ 8 Sm 1O1IOIOI 1 ーー キーー ト ーー LU VLVO 9 と
1=A:T=X:IP IXHN:9=(I*P)
0:E0LI=Pd0d:EOLI=Id0d: 1 LX ヨ N:$VLNIHd:$VOV ヨ 4: 9019=! d0』d: 9Z と ddO0LS ヨ dE IE。 LNIdd 91Z
くく くく く (TIdH) (と 6 ナチ 、4 へ よ >>>>> AHJH 69Z
999{ OLOD 99Z
9【CN ヨ HL6 =00 ヨ 1 :T "FIXN: 1+00=0ON ヨ HL( IF )NV=( TP )d0 ヨ 1 :EOLT=PHO ヨ :EOLL=I0』 96【
1 IXHN:(Zx([)dNH) TNI =( TP) ヨ 0:E0LI=PdOd:EOLI=IH0Od:9=02 981
*esuLNIdd 9/【
くく くく < くく (AOO) ? ナチ 4 と 4 と 、4 く よ >>>>> AH 69【
9G[ OLOD:9/1*91C'99/[ OLOD V-? NO: d+.OISN 991
gGI OLOD: Egg,LNIdd:9I
"gc 0SdI1O NHHL 9=V 』I:V ID::。 義 6【[E] 0 〔[Z] 0O 〔I] HSrld, LNIdd:9I*9 0SJIO 9GI
ndN ヨ 96 と と 、4 へ 二 。) と くす と と 、 ダ へ 寺 、- る を - て 。 コ く F。VLVO 9 も 【
ILXHN:
VI: に)。iILNIdd: TX と *8 OSAIO:$V dV ヨ di:E0OLT=1d0d::。[ -ccz ] ,LNIJd:9'9【 dOS(1O 9EI
g?【 ddOLSd ヨ ad GZI
(6 と 放 。)$DNIdLS:(9)dVL LNIJd:IL
XJN: に (2 と )$HOVdS: (9)dVLLNIdd:/ 0 1=I d0d:(6 と " 放 。)$DNIdLS:(9)dVLLNIHd 9ZI
*wsn LNIddiN' もつ "ヤン "9S TOSNOO II
くく くく くく? - と ニ 〆 >>>>> Ad 691
TFTTTT9 の TUTTTT[T VIVOEIIPLIXN (IP)NVQV ヨ :E0LT=PHOd:EOLI=Id0d 99I
[ LN] * ON [ 入 ] ~ 59 和 ん
6HSfld。=(【) き 1 AH の の の ゆ ゆ せ [ キ ] みあ ゅ の で HSd あ る あの ゆ で "町 相 あ ゃ ゃ やせ =(9)$HW 96
作手 [ババ ババ ハ ド 揚 計り の ゆ ゆ ゆ せ 猿 。 半 ゆ ゆ
ふゆ の ウ ツウ 還 還 昌 の ふふふ 人 還 還 還 識 昌 み ふい の 較 還 蘭 さや や の ふせ 硬 。 ,。=([)SVH 8
。 OddL:(T)$ ヨ N*(T)$Vd'(E*E)ON'(E*E)NV'(E*E) ヨ 0 WI 9/
くく くく ? ル そん 4 本 E く ペー >>>> AH 99
広まる ま 、 広 みえ エエ よみ メメ エエ エエ ネエ テテ MeP| 9G
% 。 NIIO「 エ HMVJODOddXAHJ 9 ヤセ
※ "つつ "うつ "IE 作 4A %※ 内 HH 09E
※ り と と -Z 人 MO 999C-ZM JOJ へ 、 く また % 内 HH 9
拓 湊 洋洋 洋 潤 甘 潤 潤 茨 潤 洋 湊 潤 浴 洋 基 潤 湊 潤 潤 粒 基 洋 基 ※※ 区 恒 避 9【
古 呈 呈 せ 多 綴 問 。 ニ ( ) $V 紀 ・ LU 製
-375-3401) X 1 (C,D) 〇 テー プ \3.500 @3-D つ ぽい 画面 構成 の スペ ー ス も の リア ル
ー パ - イン ボー ズ 機 能 を 前 提 に 背景 は 黒 1 色 な の で 自分 の 好き な 背景 で 遊べ る 。
//
プロ スコ ム パ バック ( 合 03
目
w り
の
sy た / タイ ム ゲ ー ム 。 X 1 の ス
遊び 方
1 人 人 で も 、2 人 で も フレ イ て きる つ
な ひき ゲー ム 。
は じ め に 、「1 or 2 PLAYER?」
と きい て くる の で 、1 人 て 遊ぶ な ら 1、
2 人 て 遊ぶ な ら 2 を 入力 し て リタ ー ン
・ キ ー を 押 そ う 。
まあ と 、 よ だ ん に つか な ひき が は じ ま
る 。 や り 方 は 、 ハイパー オリ ン ピ ビック
な だ ど だ と 同 選 よう に 、 ひ だ すら キー を だ
だ きま くる の だ 。
PLAYER 1 は 、 [1 一 9| の キー な ら
ほれ 2C も いら いら 。 だ だ し 、 四 と か 選 の キ
江 |
Se
ン
へ 寺 Y ディ
。k せ J 馬 は OF 所 て 沖 滞 洪
, 敬 ご ha
ほ の x 江 瀬
語 ペ コー | |
| 中 は FNHN は 0wAA 可 玉 つ は は
原
祐
く
MEDAMAMUSHI
ご さき で は JJwCAC 層 に JNN |
だ 池 必 市 ささ っ 。 齋 半田 回 の さ ヘ ー コ
え
な
も ヽ
アア
F
4
て
も
れ
を
作
0
た
け
ど
一変 数 リス ト 0 初期 設定
C…… 人 間 の 座標 ・ 20~- 40 画面 表示
A…… 人 間 の 人 数 ・ 50 キー 入力
AS……KEY 入 力 用 ・ 60- 70 ゲー ム オ ー ル バー 判断 ・
BS…… 勝 つ を だ チーム 00 人 間 表 示
田 プ ロブ ラム の 説明 ・100 ゲー ム オ ー バ ー 処 理 ・
72
mWWWWMWW
ー を 押し て し まう と エラ
ー が 出 て し まう の で 注意
し よう 。
PLAYER2 は 、 訓 計
[9| や 特殊 キー 以外 な ら 、
どの キー で も いい 。
コン ピュ ー タ は や だ ら
強い の で 、 1 人 用 で や る
と き は 深呼吸 し て 気 を 沙
ち つ け て 。 慣 れ た ら 余 裕
で 友だち と 戦 お う ぜ 。
Yuo8、roP rs
- 邊 ID は は はい 較
を いと し いこ うい と いと テス ー
+ の に 日 っ や oO 。
ズー ーー
00<3 の いび
T イ Oo の TI の の ご ー コ は
GO
ーー スト ン アイ ゴー
|
ユン
い ' 1 で
TI
コ エ マ || マ 、 〇 ょ て ト の
エロ み 〇 コト
mWWWWW
よかっ | 9 選
\ ツ < へ O③⑤ ヽ = Ox
つい =
WWWWW
・ 一 チェ エッ ツ フ ボイン ト
: ゲー ム オ ー バ ー 後 プロ プラム
: 自体 も 終わ つて し まい 、 リプ レ
イガ で きま せん 。 そ ご で 100 行 の :
・ END を 消去 、110 行 GETX$:| :
FX$=*S"THEN GOTO0,
天 参 DOO0 ノ O 参 参 欧 D 参 O 全 参 き / @OOS 多 OO000
DO 参り 参 参 参 / 〇 全 全 馬 き DOO 参 る D/ DO 欠 人 O 欠 00@00/ 0C
マリ パース リク ピッツ ググ の 思
領 で キー を 連打 /
で も 、 愛
・ 120 行 GOTO110 と すれ ば 、 で
再 ゲ ー ム が で きる よう に な り の ま
・ すず 。 放 アイ デア は いい ん だ けど
WW
アカ
単純 明快 の あり ふれ た スク
ロー ルレ ・* ゲー ム oe な ie カ ・ と 思っ
だ に だら 、 ジ ラズ スズ ス J。 が ある の だ っ
8
円 円 で 左右 に 移動 し な が ら 6
まがり くね っ た 穴 の な か を 進
Pa 2 を こと: こま も は
ジン ツー だ けけ と 、 な ん と の で 倫 床
5 左右 に 揺れ る の だ /
あり きだ り の ゲー ム に 、 ぜ ゼ
リッ と スパ イス を ふり か けた
と いう 感じ の アイ デア ね 。
秋 れ る 感じ は 、 ち ょ うと 地
忘 が 起き た みた い 。 こ の ゲー
を や っ て る とき に ホ ポント に
地 岩 が きだ た ら お も し ろ い か も 。
文 参 考 「 マ イコ ン BASIC マ が
ジン 」83・8,『3D-CARRACE,」
一 変数 リス ト
T( )…… 効 果 音 先頭 番地
に con プア イター の 似 置
D…… フ ァ イ タ ダー 消去 の 位置 .
( う sueeisiwo : ズ ニー リア
H……PICK( キ ー 入 力 )
O.W…… 爆 発 時 の キャ ラフ マヤ
お …… 読 み 込み 用
人 A As 汎用
田 プ ロ プ ラム の 説明 (BASIC)
度 の う 点 ン
は ケ も コ 北
も | わ な ン 海
う ム けけ い ク 道
と の スラ |
キ R われ キ フ 市
レ G か | の R
イ B ら 部 な 高
な で ん に い 校
ゲ 見 性 人 こ 1
| る 格 部 と 年
ム と を し か の
を すし て ら 私
作 ご て し は
リ りく い ま か
た 地 ま つっ ん 学
い 味 す た の 校
) と 共に
今 こ い 通 パ
POKE 9.9:CLS:T(9) =$7929:T(1)=$ も 792C:T(2)=$ も 792F:F=$C3B9 :G=- 18
TEMPO_89:LOCATE 9.1:PRINT の ESPC( 1)
LOCATE 1.9:PRINT "SCORE ":GiSPC( 6 ) :"[ 上 HOLE ファ イト 21]":GOSUB 159
R 9 M て ター の の へ の いこ の の の の の へ と へ この この へ クン い つこ
D=F:PICK _H:F=F+(H=28 ) -(H=29) :J=USR($7999,D) : K=PEEK(F ) : し =PEEK(F+1 )
り =USR($7918,F):PLAY "B",T(V) : RANDOMIZE:IF K<>L THEN 86
V=INT(RND( 1 )x3):POKE $7919.31+V:G=G+1:LOCATE 6,9:PRINT Gi"m ":GOTO 59
Q=$1C:W=$ も 9E:FOR A=1 TO 39:SOUND 699., 1
POKE F,Q:POKE F+1.Q:POKE F+32.Q:POKE F+33,Q:SOUND 799,1
POKE F,W:POKE F+1.W:POKE F+32,W:POKE F+33。W:NEXT
LOCATE 9.8:PRINT SPC(49):"G AME OVE R":iTAB(137):"HIT ANY KEYII "iTAB(64)
PICK H:IF H<>9 THEN 19
GOTO 126
REM XXxxxxxooxxxxOXxXxOOX
RESTORE 179:FOR A=$7999 TO $7931:READ S$:POKE AJVAL( "も "+S$) : NEXT
FOR A=$D998 TO $D927:READ S$:POKE A,VAL("$"+S$) :NEXT : RETURN
86.29.a7.99、a7.91,a7.29,a7,21,ce,cC3,de,a6.99。a7:REM $70090
29,99.8C,cC1。1f,26.f6,39,.86,.91,a7.99.86.92,a7,.91:REM $7916
86.93,a7,29,86.94.a7,21.39,12。1.9,12,3,9,12,5。9:REM $7929
91,93.96,.94.94,95,cC7,cf ,99,89,cC9,49,49,49,C6,e6:REM $dg08
db,fb,fb,fb,fe、c7,ca,12,b6,be,be,be,be,c6,a6,99:REM $dg18
10 初期 設定 ・150 マシ ン 語 デー タ 読 み * 702A- や 7033 効果 音 デ ー マ
20~30 画面 作成 込み ・ $DO08~$D027 ファ イタ ー デ
50 ファ イタ マー 消去 位置 ・ 160 ファ イマ ター グラ フィ : ー タ 左上 、 左
設定 ・ キ ー ス キャ ン ・: ツ フ デー タ 読 み 込み : 下 、 右 下
USR( フ ァ イ マ ー 消 : 170~190 マシ ン 語 デー タマ : 田 チ ェ ッ フ ボ ポイ ント
去 、 下 ス フ クロール) * 200-210 ファ イタ ー ブ ラ フィ ・ ス フ ロ ー ル ゲー ム で も 、 こ ん
60 USR( フ ァ イ マ ー 表 ・ ッ ツク デー タマ ・ な に 全体 が 揺れ る と な ん と も 難
示 )・ 効 果 音 ・ 衝 突 判 : 軒 プ ロブ ラム の 説明 (マシ ン 語 ) ・ し いも の で す な 。 ブログ ラム 自
定 ・$7000 て お 7009 ファ イタ ー 消 : 体 に は これ と いつ て 文 名 は な い
70 穴 を 揺らし て 動か す ・: 去 ・ けれ ども 、 ど う せ ね な ら い 色 気
スコ ア 表 示 ・$700A こ $7017 下 ス フロ ー ル : を 付け て ほし か つた だ ね な 。
80-100 爆発 ・ お 7018 て お 7029 ファ イタ ー 表 ・ 娘 バッ チリ 賞 。
110 こ 130 ゲー ハム オーバー 処理 ・ 示
/ う
00 ど -/*@
CM
。 人 人 弄 +
MD 佑 若 日
6 「 剛 1 HHHHHHHHHHIHH
誠 0 0 2 HHHHHHHHH 欄 較 ン HHHHHH FT u
半 細 訟 も HHHHHHHHHHUIHHH マン Hp まま I 帳
生き 二 HHHHHHHHHHH 上 5 すす !
和 論 2C0 を = 浮間 。 華 人
人 っ kN )) さ | 昌 + ド J Hi 秋 尋 日
2 トト へ ン | つ 財 下 .
IO NN | 「 主 [| HHRHHHHHHUI
る 内 へ 訓 9 | 商 計 は HL HI る 、 1 aw 四 8 8 トド 二 1 l
ウ 。 1 HHHHHHHHIR ' 瑞 L. . ili 財 ト
思 AN AN 映 の 0 5 FTHL HHR 共 7 帝 人 HHHHH | 環 1 1
ー ae ky く 8 の 江 El THHHH ト 光
ゃ Oo ゃ で つこ と ビ 上 - 是 。 W L | |
っ つり 26 ヽ Q HH IFHHHI 『 こ J
人 0: 還 に ITHHHHHHHHRIHHHHH 了 | | 昌 』
つり う 、 内 3 い ヘン Pt か 9 1 に * 昌和
二条 岬 K 上 | 較 HHHHHHL
1 23 凍 iih
タン きも し 2 に 2 和 彰 媒 瘍 潤
2 時 | 9 | | So |
人 HHHI < l
2 NHNTHHTTTTH 田 山 員
- X JE p HHHHHHH 上 肖 昌
\ っ ー ア 1 . て へ 1 | 1
は mrirind。
が 3 HH 上 3 THHHHHHHHUH 1
> 叶 RK No se HHHHHHHHHHH[
ン 会 PS 1H HLF
ゃ ンク 1 つの av の た h NM Sel uH 中
5 多々 公 OS 3 sae |
\ 拓 。 利 S 全 1 っ S 。S 半 の の 4 きき |
人 導 り ノー < 6 に っ 本 訴 ト つ -
0 まま ね 時 TUTTI
WP \ フ SN 軸 な リ B ロ 2J > フ 了 や) 愉 ォ フ 財 0 咽 才 1 TTYT T 1 Hi
ICN < うこ 0 し アデ) へ こ ーー 8
を 生ま たま すま も を ます と TDD
5 と 1 ソ を に - つ 1 いる で 2 ュ ア
た ベト つ S し きち っ (0 | MP
時 - の で / 0 ヘー 昌 G 突 史 せ
> で >6 臣 * 一 | J つ せ ムロ 8 っ S で 事 失 6
ー ラ 福 P ト 0 1 つう つ で せつ で
0 破 じ ふ ネ 。 っ 織
っ 導 所 ふい る う や 計 INC-tCk 間
09 0 曜 に よき 沈 ーー、 つ ュ っ の KW 6 AM ぐ
りり 業 で MIN ヘン Bi NN |
3 い 〇 ヾ NN -R \ S、 | O 9 ん ルー ュ 6 (
ー) ルク ー9 SN td 人 の で で 必 和
Sss 2 こと の
の の て か / ト に ^ ヘ
まま KbRE ま 1 S く R ふ $) な CS |
9 ne.( 介し うき さつき Se | 3 PO 1
TN ミー 人 < で ン Cy ww 1 剛 | 措 | へ ヽ 0 Ia 雪 む や を
2 ※ く ー で っ いや 衛 ロ
まま RS
ます を ます すま も い ド
過 い o( ノ 4 い づり 本 Py 田 コ 9 ー、 ^ ヽ ご 0 We 0
7 で 宗 Se 3 6 0. 0
FNS ジ < べ ヽ (⑳ | 映 ー 本 ) 1
中 ト ワ い | 巡 必 公 - 導 LN 要 1
の 拉 ん fm
間 ワ 還 2 RS
の CC だ ZIA7
の と /7 ビ アア 戸
19 CLEAR 399,&HE8099 449 DATA9F3C9EA9993D29FC7BFEAA3994FE9639
29 SCREEN 1,2.9:WIDTH32:COLOR 15,9.1 459 DATA999E29739973997399733C1CFEB9299A
39 DEFINT A-Z:DEFUSR=&HE899 :DEFFNA=PEEK( &H 469 DATAED5F9F9F9FE69F571E99ED5399F3ED5B
3/ ) 479 DATA92F3219BEF7AFE953894D69518F83C9E
49 FOR I=9 TO 54:READ A$:FOR J=9 TO 15 489 DATAA99699993D29FC7A9E9699D69539FB7B
S9 POKE 8&HE899+IX16+J,VAL("&H"+MID$(A$,Jx2 490 DATAFEAA3994FE9639997323732373237323
あま の 2 JJ S599 DATA733C1CFEB9209BED5FE61FFE1439F857
69 NEXT:NEXT “ S19 DATA1E99ED5392F32A7DF329ED5F47BC391B
79 READ A$,B$:A$=A$+B$:B$="" ' S29 DATA3A7DF32149F9A85F1699191936292196
689 FOR I=9 TO 31:B$=B$+CHR$(VAL("&H"+MID$( S39 DATAF9961811299936AF1919FBDD21FFF2DD
A$, TIx2+1 .2) ) ) : NEXT S49 DATA7E99FE952994DD369929FE852944DD7E
99 SPRITE$(9)=B$:SPRITE$( 1 ) =B$ S59 DATA29FE29299ADD77993E85DD77291833DD
199 FOR I=9 TO 5:READ D$:FOR J=9 TO 7 S69 DATA7EFFFE29299DDDBE91291BED5FE64928
119 VPOKE 1152+Ix8+J,VAL("&H"+MID$(D$,Jx2+ S79 DATA991813DD7E91FE2929183E29DD77993E
29 ) S89 DATA85DD7791189C3E29DD77993E85DD77FF
129 VPOKE 1499-1Tx8+J,VAL("&H"+MID$(D$、J2+ S99 DATADD2BDD2BDD7CFEEF29A52199F3ED5B7D
1.2)) 699 DATAF396972B7EFE8529951313CDE9EA19F3
139 NEXT:NEXT 619 DATA96972B7EFE85299413CDF7EA19F496096
149 A=&HF999:B=&HAF 629 DATA2B19FD96962B7EFE8529961B1B1BCD9E
159 FOR I=9 TO 767:POKE A+1 .32:NEXT 639 DATAEB19F2ED537DF396969E992B7EFE8529
169 FOR 1=9 TO 4:FOR J=2 TO 23 649 DATA919C19F779327CF321C9EA11E9F201269
179 POKE A+Ix6+Jx32.B 659 DATA99EDB92199F9119918911999CD5C9921
189 NEXT:NEXT 669 DATA29F9112918911999CD5C992149F91149
199 FOR I=9 TO 4:FOR J=9 TO 24 679 DATA1891C992CD5C99AFCDD5992179F31172
299 POKE A+IxX169+J+64,B 689 DATAF3916299EDB8ED5B12F3FE912898FE92
219 NEXT:NEXT 699 DATA2894FE9829931D1D1DFE922898FE9328
229 POKE A BiPOKE A+24.B 799 DATA94FE942093141414FE942898FE952804
239 POKE A+32.B:POKE A+56,B 719 DATAFE9629931C1C1CFE962898FE972894FE
249 FOR I=&HF319 TO &HF372:POKE 1I,24:NEXT 729 DATA9829931515157BFEA938921EA9FE1839
259 POKE &HF399,&HAF:POKE &HF391 ,9 739 DATA921E187AFEB4389216B4FE98399216098
269 POKE &HF392.&H9F:POKE 8HF393,9 749 DATAED5319F37BB2435F3E94CD9399587B21
279 VPOKE 8&H2912.8HA9:VPOKE 8&H2915、8&HA9:VP 7S9 DATA991BCD4D99237ACD4D9923AFCD4D9923
OKE &H2019.8&8H76 769 DATA3E95CD4D99ED5B79F37B23CD4D997A23
289 PLAY"T8904L16V19CCFR32F32A05C2L3204A+R 779 DATACD4D993E9423CD4D99233E99CD4D99AF
32A+R32A+R32L1605CCER32E32FFFF " , "T8903L16V 789 DATACDD899A72996AF327FF3183F3A7FF3A7
7CCFFAC2AAACCEEFFFF " , "T8902V7L16ECECECECGD 799 DATA29393C327FF3ED5B79F3CDA4EADDE5FD
GDGDGDAFAFO3FFFF 899 DATAE1ED5B19F3CDA4EACD25EB9E949695DD
299 Z=USR( 9) 819 DATA7E99FD5699FD7799DD7299DD23FD2319
399 LOCATE 6、12:PRINT "%※X%X START XX※※" 929 DATAEE1 1 1B99DD19FD199D29E2E1ED5B7DF3
3419 LOUCATE 28.0:PREKINT SGgoYe"LOCATE 25。17 839 DATA722B73C9DD21BBEF7AD694919699DD99
PRINT" M 949 DATAD63939FA7BD6149EA9DD99D62839FAC9
329 IF PLAY(9)=-1 THEN 329 8959 DATAAF4F56455229AF292D293329AF292039
339 SOUND 19.8:SOUND 5,9 869 DATA2929AF292B203129AF292B2932292929
349 Z=USR(Z):LOCATE 25.1:PRINT Z 679 DATAD9AF1E9ACD93993E9 11E99CD93993E9C
359 IF FNA=9 THEN 349 989 DATA1E18CD93991842D9AF1EC8CD93093E9 1
369 PLAY"T129V9L1605BAGEBAGEO5CDEFGABO6CC4 899 DATA1E99CD93993E9C1E94CD9399182BD9AF
1T129V804C4E4G405C2" 。"T129V703L16CR16CR1 399 DATAIE64CD93993E911E92CD93993E9C1E20
6CR16CR16CCCR16C4 ." 919 DATACD93991814D9AF5FCD93993E911E95CD
379 LOCATE 4,12:PRINT"Xxx GAME OVER XXx" 929 DATA93993E9C1E32CD93993E931E99CD9399
389 IF Z>H THEN LOCATE 8,14:PRINT "YOU ARE 339 DATAEDSFC6895F3E92CD93991EF83E97CD93
TOP 1 53H=Z ELSE LOCATE 6、14:PRINT “ 中 GR 949 DATA993E981E19CD93993E991E19CD93993E
SCORE" 5H 959 DATA9A1E98CD93993E9D1E99CD9399D9C990
399 IF INKEY$> く CHR$S(13) THEN 399 969 DATA39381C9F97999E37395E66791D9B9109
499 CLS:GOTO 149 379 DATA99949C9C9CFC7CBCBC7CFCF8F8F9E990
419 DATA23235E2356ED537DF3E53E853291F921 389 DATADFDF99FDFDFD99DE , D7DF99DDE8BD99DA
429 DATAE9F2962936292319FBED5B99F321C9EF 399 DATA55DE99DD69BD995A, 448A99D59989994A
439 DATA7AE6933C9E969699993D29FC7AE609C9F 1999 DATA44829991998199092.99999999999900990
一変 数 リス ト ・ 410-950 機械 語 デ ー タ ス
Z…… ス コア : 960-970 スプ ライ ト デ テー タマ 軸
H…… ハ イス コア ・ 980 一 1000 キャラ フタ ・ デ ー タ 回 EE =
較 プ ロブ ラム の 説明 ・ 還 チ エッ フ ボ ポイント ん
1030 初期 設定 ・ 全部 打ち 込ん だ ら マ シン 語 確 パ バ に
40 一 60 機械 語 書き 込み : 認 。 restore 400:S=ー4501: ツ W Ei
0 一 90 スプ ライ ト 書 き 込み : for j=0 to56:read do$ : だき に 埋
100-130 キャ ラフ タ ジ ェ ネ レ ・ for 」=0 to Zs=sx or v 上 計 記 。
ー マ ダー の 書き 込み : alC&h'+midS(d お J* オ +1. の 四 計 証
140 一 230 画面 設定 ・ nextinext:print s:end て 本
270 色 指 定 :・ を 打ち こみ リタ ー ン ・ キ ー。O 四 回 回
280 ミコ ュー ジッ フク ・ が 表示 され だ ら OK。 ぞ "モーー
3
290-400 メイ ン ル ー チ ン
W
間 UM
WWWWWW
ww
4 方 向 か ら バグ が
Z-80A に 襲い か か ' っ 川上
0 ーッ | MT 上
の) 、 8 ル ・ キ ー で ス ュ コープ | 議 THHtHHHHtHT
バン ンス 遊び 方 人 | 目 uu /
あの いま わし い バ グ が つい に 実体 化 ・ キ ー て 退治 し よう 。 eeellmmm
し て 、Z-80A に 襲い か か っ て くる / で も 、 ス コー プ は 加
RUN す る と 、LSI の うえ を コイ ン が 速 が つく の で ちょ っ
回 転 し な が ら 移 動 す る デモ 画面 。 こ れ と 操作 が 難し い ぞ 。
な か な か カッ コ い いよ 。 ジ ョ イス ティ イ と きど き 、 あ る ポ
ッ ク か キー ボー ド か を 決め た ら ゲ ー ム イン ト を 撃つ と スペ
スタ ー ト 。 シャ ルフ ラグ が 出 て
エク スト ラ 追 加 。 ト
ジン の うん 信 出 区
いく t 3 肖 くる コイ ジ を 撃つ と
ぱっ し 基 い の ボー ナス 1000 点 だ 。 0 章 せ 8
に いこ の で ロ バグ が の -80A を 5 MGM
う 3 ゲ 革 テ ラ | 回 何 生 6 ゲーム
し に ム 昌 ノ は オー バー に な る 。 を 3 Il
っ の そ い り ナ れ か ら 自 分 で 選 -80A = |
4 0 の か ら 和 注意 し ょ う 。
い ババ し を る か 打ち こみ バグ に も MIU 「
1 uu 注意 し ょ うお ね 。 ム や られ だ ! ご この スコ ー プ 、 操縦 が 難し いん だ よね 。
一 変数 リス ト OGA ステ デ テージ 数 ・ 170 一 410 画面 設定 ん と いつ て も 場面 設定 が いい 。
H…… ハ イス コア SP…… パ バブ の スピ ー ド ・ 420-580 メイ ン ル ー チ ン 加速 が つこ スコ ー プ 、 へ ロ へ
玉 Mno コ イン ガ が 出 こ て いる か マ S「…… キ ー 入 力 判 定 用 590-690 キヤ ラノ ンタ デー ツ 品 飛 の で 行こ サイ ル 、 スペ シ
e @ @ @ @ @ @ @ @ @ @ @
SR,DXJDY…… デ モ 用 MX.MY…… ミ サイ ル の 座標 ・ 700-740 爆 発 処理 ・ ヤル フラ グ 、 ボー ナス コイ ン と
IY…… 画 面 設定 用 SC…… ス コア ・ 750-830 ミサ イル 処理 ・ な ガ な ガ 凝 つて いま す な 。 デ モ
SX,SY…… フ ラッ グ の 位置 ・ KE…… 図 し だ バブ の 数 ・ 840-900 パプ を や つつ け だ 処 ・ も いい で き 。 プ ロブ ラム の ま と
ALB…… ス コー プ の 座標 ・ 田 プ ログ ラム の 説明 1 理 ・ まり が いま いち だ けど 、 ご れ か
C,D…… ス コー プ の 移動 用 ・ 10 一 30 初期 設定 ・ 910-970 ゲー ム オ ー バ ー ・ ら も が ん ば つて 凝っ つた も の を 作
… バ パブ の 思 向 ・ 40-100 タイ トル ・ 980~1000 フラ ッ グ 娘 理 さら で ほじ しい も の で す 。
X.Y…… バ パブ の 座標 ・ 110-130 デモ ・ 田 チ エッ フ ボ イン ド ・ 。 と ころ で 、Z-80 の 足 つ て こん
CH…… バ パプ の キャ ラク マタ ・ 140-160 キー ボー ド Or ジ ョ イィ : ゲーム と し て は 普通 の シコ ー : な に 少な ひつ だ け や 娘 パッ チリ
LF…… 自 分 の 残り ・ ステ ィ ッ クマ ・ ティ ング ゲー ム だ けれ ども 、 な ・ 賞 。
967 0109: の 0G ニ 人 S: 99G=XS: の “(日 “ け ) “9 ヨ 1 TddS1Td:1X ヨ N : 999L019=IH0 の 999【
ゴ 1"【#1NTdd:T"(【SGT“GTT)1 ヨ Sd: コ ヨ *【*(6S【T* の GT)-(【LGT*GTL) ヨ NI]: 8899,AU]d
9660109*【+ ゴ 1 モニ ゴ 1:67 (日 " け ) “9 ヨコ 1 TddS11d: の "(の "の ) “9 ヨコ 1 TddS」Td
6 ヨコ S 1 ヨ 0% 0109: コ S0 1 _N ヨ HT( と 【 ) $dHJ=$ 人 ヨッ NT ゴ 1
人 ヨメ [1 ヨ d] 1TH。"【#1TNTdd:TT“( の CT“T+ の 9)1 ヨ Sd: tt 010J
H*4ST ヨコ HO0OS TH ,"T#INTdd:T*( の LT “1+9G)1 ヨ Sd: と 0]0J
JS*。ST ヨコ 40JS TOA, “て #TNTdd:2“( の 6*T+ の GS ) 1 ヨ Sd:2 010J
sd ヨ A0 ヨコ MOD。“"【#1NTHd:6“( の 2“ エ + の 9 ) 1 ヨ Sd:6 d0100:Z019=TJ0 コ
JS=H_N ヨ H1 _H<=JS コ T : と ゴ タ 9202d2 ヨ 2d/ 0. 入り ]d
1X ヨ N: の "(の 9" の) “エコ 1」 TddS1Td: 8019=Id0 ゴ :S]J:T*T*GT 010J
@?7 0109
7=dS_N ヨ H」 G=dS ゴ [ :【T+dJS=dS : , ヨ 90 コ ヨ dJ, 人 けり]1d N ヨ H」 の [= ヨメ オ I
7 0100:US"T#INTddiT“(【2【 “GTT)1 ヨ Sd: d ヨ *【*(62【 “の GT)-(【2【 “GTT) コ NT ]: 【+US=US
1X ゴ N: 99019=Td0 ゴ : , ヨ 9U0 コ ヨ dHUU コ ゴ ヨ d ヨ UD コ ヨ d,, 入 り ]d: の = ヨメ
968 N ヨ H」 9C<> ヨ メ ゴ コ T: の “(人 人"X) “H ヨ 1 TddS」rd
JS“【#INIHdET“(T と T“GTT)」1 ヨ Sd: d ヨ “(997【* の SG【)-(T と 【*GTT) ヨ NI]: の 9L+JS= つ S
。【【ACECd6666W6S,, 人 り 1d: エ + オ ヨメ = ヨメ
967 ヨゴ S 1 ヨ 978 N ヨ H」 の 【+ ヨ => 人 dNU の 【- 晶 <= 人 dNU の 【+ り >=X dNU の 【- り <=X コ T
1X ゴ N:』
966
の 996
96
9096
956
の 76
の > 6
9 と 6
9【6
906
969
の 89
99
096
059
79
の 9
9580109: の = 軸 : 1X ヨ N: 9 の 9019=Td0 ゴ : ,9 ヨ
8H8 ヨ 8d。 信 け 1d: 996+JS=JS: の "(の 2“ フン) “9 ヨ 1 TddSIr1d N ヨ HH] 【=M ゴ NU タ =(9+ ヨ *9+U) 1NTOd コ I
の 86 _N ヨ H1 9【+ ヨ =>AS _dNU 9【- 昌 <= 人 S dNU 9【+U>=XS dNU 9【[- り <=XS TI
99 N ヨ H」 99【> dNU Gg8< ヨ dNU の GL>U dNU G9L<U コ I
の “(AM“XM) “G ヨ 1 TddS」T1d
99 ヨ S 1 ヨ 96 ノ 2 N コ ヨコ H」 G+ ヨ ニ > 人 AM dNU 98-<= 人 MM dNU 9+U=>XMM dNU 9- り <=XM コ I
9 一 人 只 三 人 コ S 1 ヨ 8+ 人 愉 三 人 囚 N ヨ H」 >= ニ 人員 ゴ [
8ーXM ニ XS 1 ヨゴ 8+X 罰 =XM N ヨ H」 けり >=X 愉 エド ノ " (AMTXM) "G ヨ 1TddS1Td
の 0 の 【 ニ 人員:G と 【 ニ XM
の 77 コ S 1 ヨ の 【6 N ヨ H」 の = ゴ ] コ I: の "(人 “XX) “2 ヨ 1 TddS1Td
1X ゴ N・ の 990019=Td0 ゴ : ddD0 ヨ Jd ヨ DU0,, 入 り ]d
2 0109:1X ヨ NE: を 010J:6** 0]109:9G2019=10 コ
ゴ 1"【#TNTdd:【T“(【GT “GTT)1 ヨ Sd: コ ヨ * て "(LT9T* の Gt)-( て Gt “GTT) ヨ NI ]
【- ゴ = ゴ 1:GT "(26“22【) “2 ヨ 1 TddS1TTd: の "(人 “"X) “H ヨ 1 TddS」Td
99
9【g
909
964
の 998 ノ
アル 4
の 9
に Y4
の 7 ノ
り ル 4
の 4
9【4
2P4
909" の 9" の 8" の 99“ の "90" の ヨ * の ヨコ
"9 ヨ "9 コ "の" の 798 “99"09*09"T の "9 の "9" の "と の "と の 29"29" ノ 29" ノ 29'"c の と の "1 の "の [の '【9U1Ud
969
99“ の 9" の 7" の 09" の “の と "の と “9 ノ
"8 “の 92" の と "99" の 9 の 0“ の "99"T の "と の "と の 79"99" コ の "9" コ 【“ ヨ 【* ヨ コ 9" ヨコ の" ノ 0“29" と の ' と の *【 の U1Ud
89
9 ヨコ "gd コノ" ヨ と 1 ヨコ G* コ G* GS* ゴ と
に し に し に に に 0 に PE は: と /E レ 47ME に IKE: ア 75 に PKGEIMGE: だ は だ は だ は や は PLIMEMTUYISi
929
9【" の 89" の 98" の 【“UG'9【L'U979G
「【U"8T"【G"G【*UG 90“ の "99799"U の 9"T8'GU"09 タ "979d" の 9 ヨ "9G* の U" 9 の "の 09" の TUG* の 2" [OU1Ud
の 999
9 ヨ " の 9 ヨ "の ヨゴ "9J“ の “9J* の 9J* の オ
" コ ゴ "ヨゴ "ゴゴ "ヨゴ "ゴゴ "0" の 9 の "の "TL の "90999"99'Jc'99*99*"99*Jc*@9* の 9*99* つ と “OcU1Ud の G9
900" の の 9" の 9 の "の 99" の 9 の" の の 9" の 9'90
"9J"09 "09" の 0 の "の 09" の 0" の 99" の 09" の 99" の 00" の 9" の 0 の "99" の 90" の 'C の 'C の '【 の ' の 9' の の "09" の 9' の 09* の の U1UQ
の 79
【L"69"C【“ り ゴゴ ヨ ノ "コナ" ゴ ノ “ゴゴ
"dd/“ り 2799“ り ゴ "2【*6 の "TL" の "29* て の '【Z'c9"26"69' コ の "9*69* ノ 6*c9*T ン * [の "の 9*J9U1Ud の c9
0 と "の 7 "の 98"798 "9J"6 ヨ "96* の ゴ
"9 ゴ " の 96"6 ヨ "9J"78799"0 の 9" の c*997 の 96997" コ G*T9* ヨ SG* ヨ ヨコ ヨ * コ ゴゴ * ヨ ゴ " ヨ "コノ * コ G'99"06"998U1Ud 9Z9
9 の 【“8L“9Z“【J* TU'Z ヨ * コ ゴ
"8【"8 ヨ "8 ヨコ" ヨコ "9 ヨ "9d"O と “と コタ 99 の"9【 90" と 9'G9“d7" dc" て "コン " コ [*" ヨ " コ G* コ の" と */ ノ OU1Ud 9【9
@ ル 7 ら X
"ココ 'c"【 り 9"【 コ "9 と 8T* の 9【* の 927" コ と * コ 9" コ S" ゴ ヨ " コ 【* コ 【*【T" コ <*Q タ 7G9'c9 909【'9 の 9991Ud
JJ と “の d “0 ヨコ"d"9 ヨ "9 ヨ "9【
の 999
と "と と の "と の "て の "と の "の 9* の 9
"90999" と の "と の "と の" と の "と "と “ココ "ココ * の 0" 90" の 0 の"99"【 の "9 の" の 9'"90* の 090* の “ココ * つ dg」9d
270100:d+ ヨ = : コ + け = けり
の =d: の =) NH」 の 7【<d+ dO 7 と とく O+ けり 0 SG>q+ 0 GSG>J+U ヨコ 1
(9=1S) 一 (G=1S) (タリ =1S) 一 (ご = ニ 1S)+(【= ニ 1S)+(9=」S) +=
(ウミ 1S) 一 (1S) 一 (ご =1S) (9=1S ) +( ノ = ニ 1S) +(9=1S) + づ = づ Ji (0)2JT1S=」S
。 ゆ 9 190U ヨ 09 の 9 の SGM6S と 07 1。 人 入り 1d N ヨ H」 の =( の ) 人 り ]d コ I
【=M ゴ :TT"( の 2" ノン) “9 ヨ 1 TddS」1d N ヨ H」 の =( の 9G*(【)dNd)1NT コ I
の 99 N ヨ H」 9 の 【>A dNU 人 >96 dNU の ST>X dNU X> の 【【 コ I
dS く 一人 人 ヨゴ S 1 ヨ JdS+ 人 = 人 N ヨ H」 G6>= 人 ゴ I
dS-X= ニ X ヨゴ S 1 ヨゴ JS+X=X _N ヨ H」 の CT>=X コ {
6“(A“X) “H3 ヨ 1 tddS」rd
5 N ヨ Hl (0O)9 り Id1S 1
Gt“ (“けり ) “9 ヨ 1 TddS1d
ッ ーHJ・ と で ニ X N ゴ H」 と =IT ゴ [ ヨコ S]1 ヨ と =HJ:G=X _N ヨ H」 =II 』I
【=HJ: の 4【= ニ 人 N ヨ H」 【=IT 1] ヨコ S]1 ヨ =HJ:G= 人 N ヨ H」 の =II コ I
(G+G9【T※(【)dNd) NT 人: (G+G サ ン ネ ※(T ) Nd) INT=X:( タ *※(【) Nd) INT =1
の = の =J: と 日 0 と 【= リ
(G+G9【 氷 (ヨゴ MT ユー)dNd) NT= ニ 人 S: (G+6 選 ご *( ヨ MT」ー ) Nd) INT=XS
ugdgU8d8d8U90【【AGGC109 1 人 けり ]d
1X ヨ N:US“【#1NTdd:【" (と 2【 “GTT)1 ヨ Sd: ヨコ DU1S,。" 【#1NTddE の *( と 9{*T+GTt ) 1 ヨ Sd
u の 9。 【#1INTdd: て “(と T “と ) 1 ヨ Sd: ゴゴ "て #TNTdd: の "(【 タ 【「T+GTT ) 1 ヨ Sd
ゴ 1'【#1NTdd:T“(TGT“G【T)1 ヨ Sd:。 ヨ 00S。*" T#TNTddE の 9"(LZT "LT+GT【)1 ヨ Sd:GT010J
と 019=1d0 ゴ : コ ヨ "【“( の 8【 “99{)-( の 2【“ の 【t) ヨコ NI ]
IT 11X ヨ Ni』 て #TNTddE【“(]71)1 ヨ Sd
ゴ ヨ "【 "(の 【+17GT+ エ ) 一 (本 エ ) ヨコ NI 1: GTd ヨ 1S の 2 0199= 1dH0 コ : 90Zd ヨ 1S990199=Td0 ゴ :GT 010J
dB"C【 “(98【“69【)-(G ノ “Ge と ) ヨ NT 1 4" コ d。 "て #TNTdd ミ タリ 【"(G2*G の と) 1 ヨ Sd:7 010J
ゴ ヨ "サタ 【 “(の G "99 ン ) 一 (の 【 “の 9 の) ヨ NI 1: コ ヨ *【*(【 ノ “の 9) -(69 “の ご 【 ) ヨ NI ]
1X ヨ N:GT"(G2“ エ )-ー(G9“*T) ヨ NT ]: と d ヨ 1S96【019 と =10 ゴ : ゴ ヨ "(09 "の 9) -(@9“* の 1 ) コ NI ]
1X ヨ NT【“(I“ の S【)-(I“ の 9【) ヨ NT 1: Cd ヨ 1S の と 019=Td0 ゴ
ゴ ヨ “サリ 【 "(の と “の GS【)-(9* の の) ヨコ NIT: ゴ ヨ "CT“(G と “GSG【 )-(9*G6) ヨ NI ]
1X ヨ N:G【L“([T “の と )-(T“ の 2) ヨ NT 1:2d ヨ 1S の GT0199【=1d0 ゴ : コ ヨ * て "(Gt “の ン )-( の 9【 “GS) ヨコ NI ]
ヨ N: ヨ "GT (ZTT“G+T)-(TT【 “1T) ヨ NT]: コ ヨ "GT*(69*G+T )-(99*" [) ヨ NI]: の Td ヨ 1SZSt01ZT【T=I0 ゴ
ょ り 99-Z。"【#1NTdd:【"(G67GT【)1 ヨ Sd: d ヨ *T“( の TL“ の 9【)-(96* の Tt) ヨ NI ]
ゴ ヨ "と 【“( の 8T“62【)-(G8“G の 9【) ヨ NI]T: 1 T1X ヨ BN:。・・。 7 て #TNTdd:【*(]"T)1 ヨ Sd
ゴ ヨ "【 “(の 【+17GT+T ) (本 エ ) ヨコ NT 1: 9Zd ヨ 1S の と 0198【=TdJ0 ゴ :G【d ヨ 1S の 9/ て 0196=]40 オ
ゴ d ヨ "と 【 “(の 8“67)-(Gg “GT) ヨ NITE:GT 010J:』d14*T#TNTdHd:7【" (の 979 と )1 ヨ Sd:【 0]0J
"(9 と とり) 一 ( の "22) ヨ NI 1: ヨ "【* (972T)-( の “サタ 【) ヨ NI]: コ ヨ * タ “(と G “09) (“の 【) ヨコ NI ]
ゴ ヨ "と 【"(G8*89Z)-(GG“G【【) ヨ NI]:1X ヨ N: ゴ ヨ "タタ 【 "(9“ と +1) (の "1) コ ヨコ NI 1
8d ヨ 1S の 019 の =1d0 ゴ :G【“( の "の )1NIUd: 昌 "G【'" (98【 “の GS と)-(G“G) ヨ NI ]
1X ヨ N ヨ S 1 ヨ 9【CN ヨ H1G と C く = エゴ T
と “(6【“ と +1 ) - ヨ NT 1 と “(人 1 “と +1 ) - ヨ NI ]
と “(人 AT“"T) 一 (の “1) ヨ NI ]: (9G+ の の TL*(【) Nd) X エ ゴ ニ = 人 1 : (と + ノ *(T ) Nd) XT ゴ + エ =T] : の 7019=Ud0 ゴ
@【=1:1X ヨ NE の "(Ad"Xd) “エコ ヨ 」 TddS1r1d: の LT018=10 オ :S]0J
99【 ヨコ S1 ヨ 【=O _N ヨ H」 ,【。=$0 ゴ [ ヨコ S1 ヨ の =O _N ヨ H」 , の 9,=$O ゴ I:$ 人 ヨメ NIL=$0
1X ヨ NOT1S AO「 [【]。 て #TNTdd:【“(G9“"1-GG ) 1 ヨ Sd
sdd0d ヨメ [の ],"【#INTdd:T“(09“1 エ -GG ) 1 ヨ Sd:C010=1d0 ゴ
99【 0109 ヨコ S 1 ヨ 99【 0100:G と =Xd0_N ヨ HT 99【 く <=Xd ゴ 1:C+Xd=Xd: 【+dS=S
2=dS N ヨ H」 @【=JdS ゴ コ I: の "(Ad"Xd) “dS ヨ 1 TddS1r1d: 1X ヨ N: 0G019=10 コ
L【L“(Ad“Xd) “S ヨ 1TddS1r1d
@7【 0109: ゴ ヨ "【"(69【“26【)-( の GS“ 9G) ヨコ NI ] N ヨ H1( と T ) $HJ=$ 人 ヨ JNT コ I
96G
998G
の 5
99G
の SG
の 7
い ル うえ
9G
ゅ 【G
99G
967
097
927
997
り に も /
ルル /
の と 7
の り
9【 り
0097
96?
99 と
PA3
99 と
9G と
ルム 3
ル ラ 2
の ご と
9【 と
9 の?
96 ど
上 交
の 8
の と
の 9
り に セン
ルン
ルマン
し メン
9【 と
| ソン
96【
09【
94【
99【
9S【
の 7【
の >【
9【
9【【
99【
9 ど =Ad:GC=Xd:@=dS iC【 "(96"G2) 1NTUd:C【 "2( の 6"G2) ヨ ] コ JIJ 96
1X コ N:,HO1US TUSUM 796【
( う ) “て #INTdHd:T“( の LT"T+T と )1 ヨ Sd の 9
ai 人 ヨメ [1 ヨ d] 1TH, “て #TNTHd:iT“(G9"T+GG) 1 ヨ Sd の 4
。d ヨ 09H,。 "て #1NTdd:【 "(の 9“ [+29) 1 ヨ Sd: と 019=TH0 ゴ :1X ヨ N 9
ゴ ヨ "GL“(G と を “8+I)-(【 と CT“T) ヨ NT 1: コ ヨ 'G【“" (67“78+T)-(G サ “T) ヨ NTI 1:G2Zd ヨ 1SG の 01G と =Td0 ゴ の G
ゴ ヨ *【* (の と 【 “の 992) -( の GS“ G 選 ) ヨ NI 1: の = の 7
【=US :=dS : の = ヨメ : の =JS : G ニ ゴ ]: 【#SU, : dd9,N ヨ d0:S 1 と 【"G【 010J @ と
1* 11X ヨ N:$
り =( 1 ) $ ヨ 1」 TddS: (($ ヨ +,HS。) 1UA ) $dHHJ+$ り =$ け : $ 日 9 ヨ dd: と 01【= 180 ゴ ッッ ニモ $ り * の 【010=Td0 ゴ ・S、1J 9 と
ヨッ OVH
の =H:96G ヨコ dJO1S ヨ 4: の 9 の "2" N ヨ ヨコ 4JS の
ZZ
05
スタ ヤー・ パ ッ ク が 、 敵 の ポッ ツキ ー や 原 住 生物 ナン ジ ヤ モ ンジ ヤ を か わし て 街 を 掃除 する ゲー ム 。
心 タ クス フォ ー ツ 高知 (会 0888-40-1207) 必 X 1 (G-RAM), C, Cs, Cj。D (カセ ッ ト 要 ) ぐ テ ー プ \4.000 依 テ ル
Mr.Pac !
ヽ ツ ェ ッ ル ノ ル 坊 主 み た いな
秋 に ぴっ た だ たり と いえ ば びっ た り の ゲ
ー ム 。 源 死 の 蝶 が 出 て くる あたり 、 い
が に も そん な 感じ 。 よ ーー《 考 える と 、
ちょ っ と 残酷 な 気 も する な 。
いや いや これ は ゲー ム だ か らし て 、
を ん な 私 情 は は る ん じゃ いけ な い 。 と
に が て く 、 和 キミ は クワ ガタ 貝 / と どー だ 、
まい っ だ か 。 そ し て 、 キ ミ は 蝶 を 食べ
て ポイ ント を か せ ぐ の だ // 移動 は カ
・ー ツ ル ・ キ ー ま だ は ジョ イ ・ ス ティ イッ
嘩 (Y
ン
ゝ ヽ 引出
は う きき は き に さと び へ 必 本 / 寺 半
A へ ご 。 届 人 は 三 党 さ へ 」
J 計 へ 員 と の とい 壮 還 き ポレ 計画
AS は J 革 和 ま 詩 同 技 に NN ロ NLS(( 。 和
と 2
り
仙
井
と
い
う
名
ーー
を
他
の )
に 1
で
まず は 2 匹 の カブ ト 是 。 こ いつ
つの よる か とら 1 ウン る し る 。
木 の 横 か ら 舌 を 伸ばし て 《 る カメ
レオ ン 。 この 舌 に 触れ て も 1 匹 ダ
ウン だ 。 る 区 ダウ ソン て ケー の オー
も は AA ペー スッ キー (まほ
だ た は ジョ イ ・ ス ティッ ク の トリ ガ
ー) で 、 1 匹 に つき 3 回 まで ワー
フ で きる 。 せ い ぜ い 活用 し よう ね 。
ノノ /
ム 元 棋 か ら カ メレ オン が スル スル .…… と 舌 を の ば し て きだ 。 ヤ バイ /
一 変数 リス ト ・ X( )…… カ ブ ト ムシ の X 座 標 '・ 1330-1390 ゲー ム オ ー バ ー
HS…… ハ イス コア ・ Y( )…… カ ブ ト ムシ の Y 座 標 ・ 1400-1420 スコ ア 表 示
S…… ス コア ・ 較 プ ロブ ラム の 説明 ・ チ ェ エッ フ ボ イン ト
A…… フ ワ ガ マ の X 座 標 ・ 60~-220 初期 設定 ・。 ほのぼの と し た ゲー ム で す な 。
B…… フ ワ ガ タ の Y 座 標 ・ 230 一 430 木 を か ぐ ・。 ちょ つと プロ グラ ム が あつ ち
A2…… チ ヨウ の X 座 標 ・ 440-500 スプ ライ ト 定 義 : こつ ち に 飛ん で いま すね 。 ス プ
B2…… チ ヨウ の Y 麻 標 ・ 510~1180 メイ ンプ ログ ラム : ライ ト の デー タダ は 一 番 後 に 、 ま
B3…… カ メレ オン の Y 座 標 ・ 1190-1280 スプ ライ ト デ ー タ ・ だ スコ ア 表 示 の サブ ルー チン は
7 ど
ゲー ム 中 、 一 定時 間 ご と に 動き が は
で が か の て ンチ に だ な る だ だ し ポポ 4
ク だ 。 で も 、 敵 は 多い ぞ 。 ント は 10 点 プラ ス ) の で 、 注 意 /
メイ ン ル ー チ ン に 入れ だ ぼう が
いい で し よう 。
940 行 1010 行 あ を り の キー
入力 処理 な ど は 論理 式 を 使い 、
まだ その 後 の |Fー THEN の 山
も 整理 すれ ば も うつ ち よ つ と 早 ぐ
な る の で は な いか ガ が な や 支 ヨ ッ シ
ャ 賞 。
の と だ ZI ル 7
の と 7 アア
1 '※※※ 区 区 区 ※※ デ ※ 光 光 光 区 区 光 光 光 区
29 '※ クワ カ ~ ッ タ ン 3
3 '※ by Tomonori Itsui
4 '※ 1984/8/27 ※
OM '※※%※※※ 光 ※※※※※※※※※※※ 区 XX 区
69 SCREEN 1:KEY OFF
79 LOCATE 6,1:PRINT "%※X%X※※X※X※X 光 XX※※※"
69 LOCATE 6,.2:PRINT "※xx ※※※"
39 LOCATE 6,3:PRINT "XX※ クワ カト ッ タ ン %※※"
199 LOCATE 6,4:PRINT"x※xx ※※※"
119 LOCATE 6,.5:PRINT "XX※※※ 光 XX※※"
129 LOCATE 5,9:PRINT" ト ^ チ ラテ ^~ PLAY シマ スカ 92"
139 LOCATE 5,13:PRINT "キー- ホ トー ト * >>> PUSH 9"
149 LOCATE 6,15:PRINT "ステ ィ ッ ク >>> PUSH 1"
159 IN$=INKEY$ も : IF IN$="9" THEN ST=9:GOTO 189
169 IF IN$="1" THEN ST=1:GOTO 189
179 COLOR (CL MOD 5)+3,.2:CL=CL+ 1:FORI=1TO059:NEXT :GOTO 159
189 SCREEN 2,2.9:COLOR 15,1.,1:CLS:R=RND( -TIME ) :COLOR 15,1,1:KEY OFF
199 HS=9:PP=3:S=9:W=3:B3=199:AL=17:AX=1:AZ=9:P=PP
299 DIM X(29) ,Y(29) ,C( 29 ) , V( 2 )
219 OPEN "GRP:" FOR OUTPUT AS #1
229 PLAY"S1 4M399L64"
239 LINE(17,.9)-(175,191 ) ,19。BF
249 LINE(178,191 ) - (255,169) ,10
259 PAINT(255,191 ) 。19
269 LINE(176,1099)-(255,5) 。19
279 LINE(176,159)-(255,。55) ,109
289 PAINT(259,15),19
299 FOR 1I=19 TO 255 STEP 14
399 FOR U=1 TO 3
319 M=RND( 1 )x151+45
329 LINE(1I,M)- (TI,。M+RND( 1 ) x5+5 ) , 1
339 NEXT
349 NEXT
359 X=29g:FOR I=9 TO 5
369 CIRCLE( X, 20 ) , 3 , 2
379 PAINT(X+29 , 29 ) , 2
389 X=X+35
399 NEXT
499 CIRCLE(233,49) ,69,2.2,1,.6
419 PAINT(239, 69 ) 。2
420 CIRCLE(243.151) .72.2,。、。6
439 PAINT(249, 149) ,2
449 RESTORE 1199
459 FOR RE=9 TO 2:G$=""
469 FOR AD=1 TO 32
479 READ CH$
489 G$ も =G$S+CHR$ も (VAL("&H"+CH も ) )
499 NEXT
599 SPRITE$( RE ) =G$
S19 NEXT:FOR P=2 TO 3:SPRITE$(P) =G$:NEXT P
S29 RESTORE 1259:FOR RE=6 TO 7:G$=""
S539 FOR AD=1 TO 32
549 READ CH$
oS59 G$ も =G$+CHR$ も (VAL( "&H"+CH$ ) )
S69 NEXT:SPRITE$( RE ) =G$: NEXT
S79 PSET(185,29) ,2:PRINT# せ 1 。 "HI-SCORE"
S89 PSET(185,59) ,2:PRINT1 , "SCORE"
っ S99 PSET(185,139 ) ,2:PRINT1 , "クワ カ ^ タ "
699 PSET(185,169) ,2:PRINT 后 1 , "ワー フ ? "
619 S=9:Q=4:W=3:Z=3:B3=199:AL=17:AX=1:AZ=9
629 PLAY"04CDEFGABO5CDEFGABO6CDEFGABO7CDEFGABO8CDEFGAB"
639 T=9:LINE(249,169 )-(259,179) ,2,BF
649 PSET(241,169) ,2:PRINT#1 ,"3"
659 P=PP:FOR I=2 TO P
669 X(I)=INT(RND(1 )x]45)+29:Y(I)=INT(RND(1)x79):V(I)=INT(RND(1)x8)+4
679 NEXT
689 A2=INT(RND( 1 )x145)+29:B2=INT(RND(1)x79) :V=INT(RND(1)x8)+4 林
699 A=95:B=179 「 <
799 P=PP ・
719 IF Q<}1 THEN Q=4
729 LINE(219,39 ) - (255, 38 ) , 2 、BF
739 PSET(295,39 ) , 2:PRINT#1 ,HSx16 C〉
749 LINE(238 , 1 39 ) - (259, 148 ) , 2,BF
HHEEHHHHEEE XpWe
の ー ミ ソン 大 障害 競馬 カシ オ (03-347-4830) MSX( 8 K) や ROM カ ー ト リッ ジ Y\4.,800 人 自分 の 馬 に ハチ を あて て ジョ ヨッ ツキ ー 気 分
sy た が 楽し め る く ジ ヨッ キー モー ド >〉、4 人 まで 競馬 の 予想 が 楽し め る < く ベ ツ ッ ト モー ド 〉> が ある 。 グ 2 通り 楽し め る 競馬 ゲー ム だ 。 7 ツ
へ 全 S 選 共 S へ 眉 隊 mmm へ J 尽 へ ぶ こ eS HgtH9t し dm 司 SHN 壮 は NN 中 党 〈)
くわ が っ た ん リス ト 続 き
759 PSET(233。139) ,2:PRINT 拉 1 ,W
769 GOSUB 1499
779 FOR K=9 TO 29
789 PLAY"S11M599L6407C":PLAY"S14M399L64"
ぎの
799 FOR I=2 TO P
899 PUTSPRITE IT,(X(T),Y(1)),4
819 PUTSPRITE 6,(A2,B2) ,13
829 B2=B2+V:A2=A2+INT(RND(1)※19)-5
839 IF A<X(I) THEN X(IT)=X(1)-V(T)/Q _ ELSE X(I)=X(T)+V(T)/Q
849 IF A く <A2+12 AND A>A2-12 AND B く <B2+7 AND B>B2-29 THEN S=S+S5:GOSUB 1499:PLAY “の 「。
"9 "L64S11M19908CD":A2=INT(RND( 1)%145)+29:B2=-16
859 IF A<X(T)+12 AND A>X(1)-12 AND B く <Y(I)+7 AND B>Y(1I)-15 THEN PUTSPRITE I,(X(1)
5Y(I)),4:GOTO 1299
869 PUTSPRITE 7,(9,B3) ,2
879 IF AX=1 THEN LINE(17,B3+8)-(AL,B3+8 ) , 8:AL=AL+109
889 IF AL>169 THEN LINE(AL,B3+8)-(17.B3+8) ,19:AL=17:AX=9:AZ=9
899 IF B+16>B3+8 AND B く <B3+8 AND AL-109>A THEN 1299
999 R=STICK(ST )
919 Y(T)=Y(I)+V(I)
929 ON R GOTO 949,959.969,979,989.999,1999,1919
939 GOTO 1929
949 B=B-4:T=T+1:GOTO 1929
959 A=A+4:B=B-4:T=T+1:GOTO 1020
960 A=A+4:T=T+1:GOTO 1929
979 A=A+4:B=B+4:T=T+1:GOTO 19209
989 B=B+4: 征 =T+1:GOTO 1929
999 A=A-4:B=B+4:T=T+1:GOTO 1929
1999 A=A-4:T=T+1:GOTO 10929
1919 A=A-4:B=B-4: 征 =T+1:GOTO 19290
1929 IF =2 THEN = の
1939 IF T=9 THEN PUTSPRITE T,(A,B),6:PUTSPRITE 1,(256.192),1 ELSE PUTSPRITE 1。(A
。B),6:PUTSPRITE 9,.(256,192 ) , 1
1949 IF STRIG(ST) AND Z<>9 THEN PLAY"07FEDC" :Z=Z-1:A=INT(RND(1)x159)+29:B=INT(RN
D(1)x174):LINE(239,159)-(259,168) ,2,BF:PSET(233,169),2:PRINT#1 ,Z
1959 IF A< く 3 THEN A=39
1969 IF A>155 THEN A=155
1979 IF B<29 THEN B=29
1989 IF B>179 THEN B=179
1999 IF Y(I)>199 THEN X(I)=INT(RND(1)x145)+29:Y(I)=-16:V(I)=INT(RND(1)*8)+4:C(1)
=INT(RND( 1 )x13)+2 ELSE 1199
1199 IF B2>199 THEN A2=INT(RND(1)x145)+29:B2=-16:V=INT(RND( 1 )X8)+6
1119 IF AX=9 THEN B3=B3+INT(RND(1)xX6)-3:AZ=AZ+ 1
1129 IF AX=9 THEN IF B3>B THEN B3=B3-4 ELSE B3=B3+4
1139 IF AZ>19 THEN A=1
1149 IF B3>175 THEN B3=175
1159 IF B3<59 THEN B3=59
1169 IF B2>199 THEN A2=INT(RND( 1)x145)+29:B2=-16:V=INT(RND(1)X8)+6
1179 NEXT:NEXT
1189 PLAY"S8M39907CDE" :PLAY"S14M399":P=P- 1 :S=S+1:IF P=1 THEN Q=Q-1:GOTO 799 ELSE
719
1199 DATA 8,18.1C,18,.C,7.F,CF,39.E,3F 、CF ,、F、F、37 、C3
1299 DATA 19,18,38,18,39,E9,F9,F3,C。79,DC,D3,D9 ,F9 ,AC,C3
1219 DATA 2.6、7.6.8、7,F,F,C0,。3E.P,3P、CF,3F,C7 3
1229 DATA 49,69,E9,69,C9,E9,F9.F9,3,7C,D9,DC,D3 ,FC,A3,CW
1239 DATA 83,.6F,1F,1F,9F,7F,1F,1E,79,8F,3,1.3E。12。4
1249 DATA C1,F6,D8,F8.E9,EE,E8,78,E,F1 ,C9 ,89,C9 ,79,48.20
1259 DATA 18,3D,7D,FF,F3,F1,7F,F,79.F1、E3,E7 ,FD,FA,F2,69
1269 DATA 18,BC,BE,FF,CF,8F,FE,F9,9F,8F,C7,E7 ,BF , 5F,4F,6
1279 DATA 91,31,.71.67,CF,DF,DF,FF,7F,3F,7F,FF,FF,F9,FE,7F
1289 DATA F9,F8,FC,FE,CE,DF,CF,F8,FC,FF,FE,FC,E9,E9,FC,7E
1299 PLAY "" "0"L64S13M19906BAGFED":FOR D=9 TO 19:FOR T=9 TO 1:PUTSPRITE T,(A,B
) 。6:FOR 0=9 TO 69:NEXT:PUTSPRITE T,(255,191),1:NEXT:NEXT:W=W-1:2= さ
1399 LINE(239, 139 ) -(259, 148) ,2,BF:PSET(233,139) ,2:PRINT#【1,W
1319 IF Ww=9 THEN PSET(39,19),2:PRINT#1 , "GAME OVRE":PSET(39,29):PRINT 失 1 PREPLAY 3?
(Y/N)":GOTO 1339
1329 PLAY"O6CDE":GOTO 639
1339 IF S>HS THEN HS=S
1349 FOR I=9 TO 6:PUTSPRITE I,(255,191),1:NEXT 1
1359 IN$S= INKEY$
1369 IF IN$="Y" OR IN$="y" THEN LINE(28,19)-(159,.39) ,2.BF:LINE(17,B3+8)-(AL,B3+8
) ,19:AL=17:AX=9:AZ=9:GOTO 619
1379 LINE(17,.B3+8)-(AL,B3+8 ) ,19:AL=17:AX=9:AZ=W
1389 IF IN$="N" OR IN$="n" THEN CLS:END
1399 GOTO 1359
1499 LINE(219,69)-(255,68) ,2,BF
1419 PSET(295.69),2:PRINT 村 1.Sx19
1429 RETURN
WWWW
UM
!
遊び 方
キミ は 右 下 の 赤い 点 。 上
が か がら や っ て (くる 敵 の ミサ イ
ルル を が お わし て で 。、 て る る だ けり
長い あい だ 飛び まわ ろう 。
移動 は テン ・ キ ー が だ 。
壁 や 山 や 敵 と ぶつ か っ た
ら 1 機 減り 、2 機 失う と ゲ
ー ム オー バー。
敵 の ミサ イル は キミ を 追
っ か け て くる か ら 、 ま ず は
ひたすら 逃げ まわ る こと を
えん よう 。
うま く 診 導 し て 敵 を 真中
の 山 に ぶつ けら 5 れ だ ら 、 ボ
ー ナ ス 点 も も ら え る ぞ 。
キャ ラク タ は た だ だ の 線 し
が で て ここ が (MC0 だ お 、 じ っ
と 見 て る と 小さ な ミ サイ ル
に 見 えて くる か ら 不 因
一変 数 リス ト
AB…… 自 機 の 座標
C,D…… 敵 ミサ イル の 座標
田 プロ ブラム の 説明
1 初期 設定 ・ 画 面 設定
の
【】
@
【】
@
@
@
@
人
ト 】
人 の
@
@
の
@
【 】
ト 】
の
L】
@
ト
@
L】
@
L】
13 一 16 灯 発 ・ ゲ ー ム オー バー
WM
WW
WW
WWWWW
WWWW
人 ム < ャ ゃ 持 〈 く ロ
ト ーー つつ !
い く と 名
ん コ ん 前
0 へ 届き
ロロ へ すっ. ashms ら へ 箇 J 通 |
に 1
too 一 コビー 鐘 (トー ミコ) トー we
へ 尾田 吾 黄 湯 S や ご きど 。( へ で 末 )
さ べ の の ーー ビー 識 宙 oko は (トー |
V >) > 職 HN 吉 0wrv の WS……
で
4 な ん だ が ガ エジプト で 戦 つ て る 感じ 。
MISSILE ATTACK
1 CONSOLE 9.25.9.1:CLS 3:CLEAR:LINE (29.19)-(629,179).6.B:LINE (299.179)-(329.19
9).6:LINE-(499,179),6:LINE (329.159)-(329,299) ,9:PAINT (9.9),6,.6:WIDTH 49、25
2 A=599:B=169:C=399:D=29:H=2:S=9: BEEP:COLOR 2:LOCATE 29.9:PRINT "HI-SCORE" :HI
3 LINE (C,D)-(C+E,D+F ) .9:C=C+E:D=D+F:S=S+1:COLOR 1:LOCATE 9.9:PRINT "SCORE":S: IF
B>DTHENF=3 ELSE F=-3
4 IF A>C THEN E=6 ELSE E=-6
S FOR Z=1TO7:IF POINT(C+Z/2+ 1 .D+Z+1 ) =2THEN13
6 NEXT:LINE (C、D)-(C+E,D+F) ,5: IF POINT(C+2.D+2)=6THEN 12
7 I=INP(9):LINE (A.B)-(A+AA.B+BB ) 、9:A=A+AA:B=B+BB:AA=AA-2x([=54)+2%(1=52):IF (1=
S9 OR I=56)THENIF AA>9THENAA=AA-2 ELSE AA=AA+2
8 IF AA>29THENAA=29 ELSE IF AA<-29THENAA=- 2
9 BB=BB-(I=59)+(I=56):IF (I=520RI=54 )THENIF BB>9THENBB=BB- 1 ELSEBB=BB+ 1
19 IF BB>19THENBB=19 ELSE IF BB<-109THENBB=- 19
11 LINE (A.B)-(A+AA.B+BB ) .2:IF (POINT(A.B)=-1 OR POINT(A+2,B+1 ) =6 ) THEN13ELSE3
12 FOR Z=1 TO 29:COLOR 2:LOCATE 9.9:PLAY "C32D32":PRINT "本 ^- ナ ス ":Zx19:NEXT :LOCATE
9.93PRINT " "・ ら =S+299:C=399:D=29:GOTO 3
13 FOR Z=1 TO 29:BEEP 1:CIRCLE (A,B) ,Z.2:BEEP 9:NEXT
14 FOR Z=1 TO 5:PLAY "C64D64E64F64G64A64" :NEXT :H=H- 1 :IF H=gTHEN 15 ELSE A=500:B=
169:AA=9:BB=9:PAINT (39.39).9.6:GOTO 3
15 COLOR 2:LOCATE 9.9:PRINT "GAME OVER!!":IF HI<STHENHI =S
16 COLOR 3:LOCATE 9.12:PRINT "HIT SPC PLAY!!":1F INKEY$="
:CLS:GOTO 2 ELSE 16
"THENHFAINT (39 、39 ) ,. 9 .6
2 変数 設定 、 ハ イス コア 表 ・ 田 チ エッ フ ポ イン ト
示 ・。 うー お 、 バ パプ と いう わけ で は : それ か ら 爆 発 パ ツー ン を 消 そう
3 4 敵 ミ サイ ル の 動き 、 ス ・ な い の だ けれ ど 、 気 に な か る と ご ・ と する と き 、 時 々 残 つ て し まう
コア 表示 ・ ろ が いこ つか ある な 。 ま ざ 再 ゲ : こと が ある けど 、 こ こも どう に
5 敵 ミ サイ ル の 行 < 先 に ・ 一 ム し て キモ 画 面 が その まま で 、 : か し た いね 。 1 画面 に 納め る の
な に が ある が 判定 : 穴 ぼ こ が 残 つ て いる 。 こ れ は 16 : は ちよ と 大 変 だ けど ……。
6 敵 ミ サイ ル 表 示 ・ 行 目 の 後ろ の 方 GOTO2ELS ・ や っ ぱり ヨッ シャ 賞 。
/~11 自 機 の 表示 ・E16 の 2 を 1 に すれ ば いい の だ ・
12 ボー ナス ・ が 、 そ うす る と 今度 は ハイ スコ :
アガ リア され て し まう か ら 1
し あず /
行 の CLEAR も 取 つ て し まお う 。
WW
WWWWW
WW
WW
16] 秀 び 方
2 機 の DM (1 と 2) を 操作 し て 、
じりじり 攻め 寄っ て くる BH を すべ て
破壊 し て し まお う 。RUN ぉ る せる と し ば
らく 説明 画面 が 現れ る の で 熟読 の こと
(320 行 の 10 を も っ と 大 きく 《 す る と じ
っ くり 読める 〉
ゲー ム 画 面 右側 の DM- 1 な どの デー
mm これ S |
9%r 持 さき |
へ は すさ
| Ce 叶 つと の どり る 呈 商 団 富 AUNI |
| で HAI ご 商 喜 活 剛 は つき と 2
| JH へ 4 。 馬 と J
rlOy attー 人 本 と は つの ペ 還 |
| せき はめ 定 で き ひ ーーwAANSN
ニー は 上 へ は 加 eN へ br 藻 貴 は
し て か ら 、 移 動
タ は 、 左 か ら 移 動 能力 、 装 甲 圧 、 攻 撃
力 。 2 行 目 は 方 向 (N、NE な ど )、 を し
て 座標 ( 諾 が X 軸 、 右 が Y 軸 )。 方 向 と
座標 の あい だ の 空 折 に は ダメ ー ジ ・ メ
ッ セ ー ジ が 記号 で 出 て くる 。DM- 2 の
デー タ は その パタ ン の 繰り 返し だ 。
BH の デー タ は 、BH- 1 一 6 の 能
に 続い て 座標 が 表示 され て いる 。dis-
tance は 、 左 が DM- 1 と 各 BH と の 距
離 、 右 が DM- 2 と 各 BH と の 距離 だ 。
移動 する に は 、 ま ず 方 向 キー 1 一
I6。 これ が NW、
INJNE、S PE、S ら
W と 対応 ) を 押
キー (回 較 国 |
[SI。 上 記 の 方
向 と 対応 ) を 提
し 、 移 動 能力 が
0 に な る ま て で 移
動 て きる 。 だ が だ
し 方 向 が あっ て
な いと 動か な い
の て 注意 。 移 動
一 変数 リス ト
E5…… 敵 の 番号
G~G4…… 新 し い 敵 の 座標
K…… メ ツ セ ー ジ の 文字 数
MM1 …… 自 機 の 移動 用
OO2…… 攻 撃 用
P1.P2…… 座 標 用
RR1 …… 番 地 の 内 容
ざ 2
900-1150 敵 移動 サ プ ブルー チ
し な いじ ひき は MM キー だ 。
攻撃 は 攻撃 目標 を 数 字 で 入力 し 、 武
避 番 号 (1… リ ニア ガン ・ 射 界 100"、
2… リ アキ ャ ノン ・ 射 界 60") を 入力 。
結果 は 右 下 隅 の コメ ント 欄 に 出 て くる 。
攻撃 し な いと き は [2Z] キ ー を 押 そ う 。
何 度 か が やら な いと ピン と こない か な 。
文 参考 「DUAL MAGAZINE」『 ダ グラ
ムシ ミュ レー ショ ンマ ニュ アル No.4』
!
を や
お タテ を は
こい か も か と て 人 8NOCO れ )
ミラ ルー いい D NN い
スス 只
か
叶
た
1
人
1
06
ビィ
1
ビ 。
に ]
ラ
9
と タ
8
る
し]
〇
4
|
4 な か な が 楽し め る パソ コン ・ シ ミユ レー ショ ン 。
表示 サブルーチン
・R2…… 射 撃 の デー タ ・ OS$…… 被 害 の 状況 2
・S.S1…… ス コア ・ 一 プロ ブラム の 説明 ・1500-2200 自 機 攻 撃 サ ブル ー
・ 1 て T5…… 座 標 用 ・ 10-220 初期 設定 チン
・V…… メ ッ セ ー ジ の 番号 ・ 230-300 タイ トル 画面 ・2210-2280 被害 判定 ( 自 機
・ WW1…… 敵 の 秘 動 力 ・310-320 説明 画面 ・ 敵 共通 ) サブ ルー
6 ゆく 2 座標 用 ・330 て 440 ゲー ム 画 面 5 チン
・ YY1…… 座 標 用 ・ 450-490 メイ ン ル ー チ ン ・: 2290~2540 デー タ 表 示 サ ブル
・B( )…… 敵 の デー タ ・ 500-890 自 機 移 動 サ ブル ー チ ・ ーッ
・D( )……… 自 機 の デー タ ン 2550-2630 メッ セー ジ 消 去 、
ン
1160~1490 敵 攻撃 サブ ルー チ
2640-2720 新しい 敵 を 表示 す
の ルーチン
シミ ュ レ ーション DM GAME (BASIC)
16 DEF FNK=ASC( INKEY$)
26 DEF FNP= も 168+P1+ ま 20*P2
38 DEF FNT=INT((T5- ま も 198) ノ ま 26 )
49 DEF FNT1=T5-$198-FNTx を 29
56 DEF FNQ= も 189+Z+INT((Z-X) *TANCQ) +Y) *26
る 6 DEF FNQ1= も 189+Zx ま 20+(ZーY) TANCQ)+X
Z9 DIM M1 を (Z) ,。D(2, の ) ,B(5, る ) ,T(5,2) (る) ,R( 2Z)
B9 LET M ま (1)="NMI" :LET も (2)=" N" :LET も (3)="NE" :LET も (4)="SE" :LET も (5)=" 8S"
:LET (る)=" SL"
9 LET 0*="DDDDFF ト NNN" :LET S1=9
199 LET NM1$ て 1)=" コ ウケ ^ ま カノ ウ コウ ケ クキ" : し ET 1$(2) ニ "コウ ウ ^ チ フカ ノウ サー ン ネ ン "
116 LET M1$ ま (3) ニ "テキ ノコ ウケ クー キラ ウフ マシ タ " :LET 1 まま (6 る )=" テ "ロイ アタ トク "ラフ カウ ヤク テー トク リウ テキ タリ
129 LET M1 も (4)=" 上 カー イア リ " :LET 1 を (5)=" ヒ カ ー イ ナシ
139 LET M1$ を 〈Z)= ニ "テー ロ イア ター クー ラ と フカ ウ ヤ ク る ナシ クト ~ クリ ラニ ショ マイ シタ "
149 RANDOMIZE :FOR I=1 TO 2Z:READ RCI):NEXT 1
159 DATA る, る 6。5,4。3。2。9。9。9。5。5。4,4。3,3。2。2。1。6。4 4。3。2。1。9。9。6
1 る 8 FOR 『=1 TO 2:FOR 1I1=1 TO ヶ
1Z9 LET DI,I1)=9:NEXT 1I1:NEXT I
186 FOR !=1 TO 5:FOR 1I1=1 TO 6
129 LET BI,I1)=9』NEXT 1I1:NEXT I
289 LET D〈1, る )=3:LET D(2。 る )=4:LET DC1 ,1)= ま 1E2:LET DC(2,1)= ニ 262
216 LET BC1 ,1 )= 和 ま 1Z2:LET BC2。1)= 多 1D9:LET B(3,1)= あ 232』LET BC4,1)= も 2 の 9:LET B(5,1)
= も 2F2
229 LET B2=5:LET S=@:CLEAR
236 POKE も 3B, も 32 , ま の 9 , も 35 , も 2F も 91 , も 40 : CALL を F992
246 LET TIME=@
256 IF TIME<2 THEN GOTO 256
249 LET CURSOR=1 の ,15:PRINT CHR を (を FA , ま FB 。 も 82 , ま FB , も 85 , も BF , も 25 , も 82) :
27Z6 LET CURSOR=29 , 1 る:PRINT CHR を (14, まる 9 。 も FE) 』TAB( 34)』" "iTABC る る 6)" "TAB( の 8)
3299=20
3298=86 29 29 29 85 29 29 8E
32A9=209 29 8F 85 8E 8F 85 8E
32A8=84 91 83 84 85 20 29 29
32B9=29 29 29 29 85 8F FD 29
32B8=86 8F F9 F9 85 8F 29 29
32C9=8F 29 86 29 89 8A 85 88
32C8=86 29 86 8A 85 29 29 29
32D9=29 29 29 29 85 8D FD D5
32D8=81 8D 29 29 85 8D D6 85
32E9=8D 2 81 85 82 86 29 86
32E8=86 2 86 81 85 29 29 209
32F9=29 29 2 29 29 29 2 29
32F8=29 29 29 29 2 29 20 29
3399=29 29 29 29 29 2 2 29
3398=29 29 29 2 29 2 29 29
3319=29 29 29 29 29 29 29 29
3318=29 29 29 84 85 85 8E 260
3329=29 84 8E 8F 83 29 29 29
3328=29 2 29 2 29 2 29 29
3339=20 29 29 29 29 2 29 26
3338=29 29 29 86 29 29 86 29
3349=29 86 8C 8D 86 29 2 29
3348=29 29 29 29 29 29 2 29
3359=29 29 29 29 29 29 29 29
3358=29 29 2 86 29 29 86 29
3369=29 86 29 2 86 29 2 29
3368=29 29 29 29 2 29 2 29
3379=29 29 29 29 2 29 29 29
3378=29 29 29 81 85 85 8D 209
3389=29 86 29 26 86 29 9D 29
3388=29 29 29 29 2 20 29 29
3399=29 29 2 2 2 2 29 29
3398=29 29 F7 F7 F7 F7 F7 F7
33A9=F7 F7 F7 F7 F7 F7 F7 29
33A8=29 29 29 29 2 29 29 29
33B9=29 2 20 29 29 2 2 29
33B8=29 29 29 2 29 29 29 29
33C9=29 29 29 29 2 2 2 29
33C8=29 29 2 29 2 29 29 26
33D9=29 29 29 2 2 29 2 2
33D8=29 29 29 2 29 29 29 26
33E9=29 29 2 29 29 29 2 209
33E8=29 29 29 2 29 29 20 20
33F9=29 29 29 29 29 20 29 20
33F8=29 2 29 29 29 29 29 29
3499=29 29 29 29 29 29 2 29
3498=29 29 F4 29 29 20 2 29
3419=29 29 20 29 29 29 2 20
3418=29 29 2 29 2 29 209 29
3429=29 29 29 29 2 29 26 29
3428=29 89 F5 29 2 29 29 29
3439=29 29 29 29 2 2 2 29
3438=29 29 29 2 2 29 29 290
3449=29 29 29 29 29 2 84 85
3448=8A 3D 88 85 83 29 29 29
3459=29 29 29 29 2 29 29 29
3458=20 29 29 20 2 2 29 29
3469=29 29 2 209 2 29 86 69
3468=9D FB 9D 69 86 29 29 209
3479=29 29 29 29 2 2 29 29
3478=29 29 29 20 2 29 209 269
3489=29 2 29 29 2 2 F2 FF
3488=F5 ED F2 FF 2 29 29 29
3499=29 29 29 2 29 29 2 20
3498=29 29 29 29 29 2 29 20
34A9=29 29 2 2 29 29 8A 69
34A8=S5B 9E 5D 69 88 2 2 29
34B9=29 29 29 29 29 29 20 29
34B8=29 29 29 29 2 29 2 20
34C9=29 20 2 29 29 2 F4 14
34C8=69 F7 6 14 29 2 29 26
34D9=29 29 29 2 2 29 2 29
34D8=29 29 2 2 2 2 29 20
34E9=29 29 20 2 2 29 F4 260
34E8=97 29 97 2 2 29 29 20
34F9=29 29 29 29 29 2 2 29
34F8=20 29 29 20 2 29 2 29
3599=29 29 29 2 29 29 29 26
3598=69 29 6 2 29 29 2 2
3519=29 29 29 29 2 2 29 29
3518=29 29 2 2 2 2 29 28
3529=20 29 29 29 29 29 29 84
3528=FE 89 FE 83 29 29 29 29
3539=84 55 4E 49 54 85 85 85
9 9
289 PRINT TAB〈36) j" ":LET 3 を =" テト ロイ アト ~ クリ ラテ トキ 系 ブ カ フ "
226 LET CURSOR=9 , 15:FOR !=1 TO 18:PRINT MID ま (NM3 ま , 1 。1)j:EMUSIC P8P:NEXT I:PRINT
TAB( 1 59) 』" START 〔S1"
366 IF FNK<>$53 THEN GOTO 399
319 LET TINME=9 :POKE ま 3B,$35, も 3 , も 38 , ま 2F , ま 61 , ま 9 :CALL 多 F89 の
329 IF TIME<16 THEN GOTO 326
330 POKE を 3B, ま 38 , ま 30 , も 3B , 2F , も 91 , も 96 :CALL も FG6 の
346 FOR !=1 TO Z:LET Pl1=1+INTCRND(B) ) *2:LET P2=2+INTCRNDK 1 1 ) )
356 LET J= ま ?Z:IF I>4 THEN LET J= を D
3 る 9 POKE FNP ,J,J。J:POKE FNP+ も を 26, 。。 け 。 け 。JiPOKE FNP+ ま 46 」J。 サ 。 サ 。。JIPOKE FNP+ も る 2 。
2
3Z9 NEXT 』
386 FOR 1=1 TO 2:LET D〈I,2)=PEEKCD て 1 ,1)) :POKE DCI,1), ま 44
329 IF DI ,2)=*?Z THEN LET D〈I,5)=1
499 NEXT 』
419 FOR 1I=1 TO SiLET BI ,2)=PEEK〈B<〈1 ,1)) :POKE BCI,1), ま 42
429 IF BI ,2)=?Z THEN LET BC〈I,5)=1
436 NEXT 』
446 MUSIC P3T2 シ U レ ミ 帳 ソ B ソ ミ D シ DP 1 =P3B フ T4 ミ ミ :LET TIME=B
459 REM MAIN
4 る 6 FOR J=1 TO 6:GOSUB 229@
4Z9 ON J GOSUB 599 , 1 1 9 ,1596 , の 89 ,1599,11 る 8
486 GOSUB 255@
429 MUSIC M:NEXT JiGOTO 4<9
59@ RENM DM MOVE
516 IF (DC1 ,3)=1)*xCD(2,3)=1) THEN RETURN
526 LET CURSOR=12,23:PRINT "DM-NMOVE "
539 LET NM=1:IF CD(1。3)=1)+〈DC1 ,。Z)=1) THEN GOTO 8<6
546 LET CURSOR=22,1?:PRINT "D"' ij" MOUE"
556 LET M1=5
5 る @ LET NM る =FNK:IF (も 36<M る ) * て M る < も 3Z) THEN GOTQ 58@
5Z9 GOTO <59
589 LET 2=M る - ま も 39 :LET Z=M2
529 IF M2=D〈M, る ) THEN GOTO <59
る 8 LET MZ=ABS(D(H。 る ) -Z〉
る 1 IF M1-MZ<9 THEN GOTO <59
226 LET DXH, く )=N2:LET 1=M1 -Z MUSIC T1P9U ラ
る 3@ LET CURSOR=25 ,*2-1 :PRINT M1 iTAB 28) を て M2)
る 48 IF M1<=@ THEN GOTQ 8c8
256 LET M3=9:IF て FNK= ま 51)*CD〈M,6)=1) THEN LET M3=ー も 22
る る 9 IF (て FNK= ま 5Z) *CD(M,) う =2) THEN LET MM3=ー ぁ 49
6Z9 IF (FNK= ま 45) *CD(M, る )=3) THEN LET 3=ー ま 1E
3 る 86 IF (FNK= も 41)*CDC(M, る )= る 6) THEN LET M3= ま 1E
る 29 IF (FNK= も 53) *CD(M, る )=5) THEN LET NM3= を 46
Z89 IF (FNK= ま も 44)*CDCM, る 6)= ニ 4) THEN LET M3= ま 22
Z19 IF FNK= ま 5Q THEN MUSIC T1P8D<:GOTO 8G6
Z2@ IF M3=@ THEN GQTQ 5<g
Z36 IF PEEKXM3+D<M, 1 ) )= も る 9 THEN GOTO 56@
Z46 IF て PEEK(M3+D(M,1)) く > も 20) *〈M1 2<9) THEN GQTQ 5<@
Z59 POKE DX〈H,1) ,D(M,。2) :LET D(M,2)=PEEKCD(M,1)+M3) :MUSIC T1P9U ト シ
Z6@ LET 1=M1 -1:IF D〈M,2) く <> 多 28 THEN LET 1=N1-1
ZZ IF D〈M,2)= ま ?Z THEN LET D(M,5)=1
Z8@ LET CURSOR=25 ,*2-1:PRINT NM1i
Z ァ 9 LET DXM,1)=M3+DCH。1) :POKE D(H。1) , ま 44
866 IF DX<M,2) う = も 44 THEN LET D<M,2)=DC1。2) :LET D<M,2)=D(2。2)
819 IF D<M,2)<> も 32 THEN GOTO 859
829 FOR !=1 TO 5
836 IF D〈M,1)=BT,1) THEN LET Dc(H,2)=BX 1 。2) :LET 1』=5
849 NEXT 』
85@ IF M1>8 THEN GOTQ 5<@
829 LET D<,5)=6 :IF D〈H,2)= ま ?Z THEN LET D〈M,5)=1
BZ9 IF (NM=1)*CD(2,3)=6)*CD〈2。Z)=9) THEN LET =2:GOTQ 548
886 LET CURSOR=25 , 1 :PRINT 5:TAB〈< る 4) 』5
8?9 RETURN
の 299 REM BH MOVE
19 LET CURSOR=12,23:PRINT "BH-HOVE ":
2 FOR I2=1 TO 5・
3 IF (BCI2,3)=1)+CRND(2) >1)+(BCT2。6)=1) THEN GOTO 1159
249 LET いい =4:LET MM1=INTCRND2))+1:IF DCUM1 。Z)=1 THEN GOTO ?249
259 IF DCM1 ,1)=B〈I2。1) THEN GOTQ 1146
29 LET T5=D(M1 ,1) :LET X=FNT1:LET Y=FNT
?Z9 LET T5=B〈I2,1):LET X1=FNT1 :LET Y1= ニ FNT
288 IF (X-X1>8) <Y-Y1 >=9) THEN LET MM2= 多 22
の 6 IF 〈X-X1 く <=9)*CY-Y1>9) THEN LET 2= ま 1E
1099 IF 〈X-X1>=9)*(Y-Y1<9) THEN LET 2 ニー を 1E
1919 IF (X-X1<@)*CY-Y1<=8) THEN LET 2=ー ま 22
1926 IF PEEK〈UM2+B<1】 2。1) )= 多 る 9 THEN GOTO 1149 3538=85 85 85 89 44 41 54 41 続 次 リ
1836 IF て PEEK(U2+B(12。1)) く > 多 28) *(M-2<8) THEN GQTO 114@ 3549=89 85 85 85 85 89 85 85 く ペ ス
1949 POKE BCI2,1),B(I2,2):LET B(I2,1)=B(I2。1)+MU2:MUSIC 1P9DP g
1959 LET BI12,2)=PEEKB(』12,1)):POKE BI2,1) 32 2548=85 85 89 85 85 85 85 83 林
1669 LET =-M1:IF BCI2,2) く > を 20 THEN LET = い -1 3559=86 44 5B 31 2D 32 5D 29 ジ
1829 IF BCI2,2)<> 多 44 THEN GOTQ 1929 3558=26 所
ゲー ミソ
ん バチ ンコ UFO 心 カシ オ (会 03-347-4830) MSX( 8 K) つ ROM カ ー ト リ ッ ジ \4.,800 殺 バ チン コ で 人 気 の あ る 、 ゼ ロフ ァ ざ どう
、 ヽ ン ェ ッ
イツ ー や オー ル セ プ ブン な どの ほか が 、UFO シ ョ ヨッ トゲ ー ム も 楽し め る 。
〇
6 石 S 民 愉 S へ 、 引 悦 om は へ ざこ て びーl9t9t Sd 壮一 HN* 中 に NMININJIdD 党
シミ ュ レ ーション DM GAME の 続き
す タ
1 89
1 9?9
1199
1119
1129
1139
1149
1159
1149
1179
1189
1129
1 2
1219
1 226
1 239
1 249
1 259
1 269
1 2Z9
1 289
1 229
1 399
1319
1 329
1 339
1 349
1 359
139
13Z9
1 389
1 329
1 499
1419
1429
1 436
1449
1 459
1469
1476
1 489
LET B(12。2)=D(1。2) :IF BI2。1)=D〈2,1) THEN LET B(1I2,2)=D〈2。2)
』F BI2,2) く <> 多 42 THEN GOTO 1139
FOR !=】 TO 5z:IF 1=I2 THEN LET 】=』+1
IF BI,1)=B(】2,1) THEN LET B(1I2。2)=B( 1 。2):LET 】=5
NEXT 1
IF り >@ THEN GOTO 2Z6@
LET B(】2。5)=9:IF B(1I2,2)=$?Z THEN LET BI2,5)=}
NEXT !I2:RETURN
REN BH FIGHT
LET CURSOR=1 2 ,23:PRINT “"BH-FIGHT"j
FOR E5=1 TO 5:IF (BCE5,4)=1)+〈B(E5, る )=1)+(INTCRND(3) )=1 ) THEN GOTO 14S56
LET E=INTCRND(2)+1):】F D(E,Z)=1 THEN GOTQ 1128
LET T5=D(E, 1 ) :LET X1=FNT1 :LET Y1=FNT
LET TS5=B(E5,1) :LET メ =FNT1:LET Y=FNT
IF DE,1)=B(E5,1) THEN GOTO 1336
LET X3= メ ーX1 : IF メ = ニ X1 THEN LET X3=.91
LET Q=ATNC〈Y-Y1) ノ /X3) :IF ABS(Qx189/PAI)>45 THEN GOTO 1229
FOR Z=X TO X1 STEP SGNX1 -X)
LET R1=PEEK(FNQ) : POKE FNG,6F :POKE FNG,R1
MUSIC T1P8 く <:IF (CR1= 多 ?Z)+〈R1= 多 2D) )*CD(E,5)=9)\(B(E5,5)=9) THEN GOQTO 14S6@
NEXT ZiGOTO 1339
LET =ATN(〈(XーX1) ノ (Y-Y1) ) :FOR Z=Y TO Y1 STEP SGNKY1 -Y)
LET R1=PEEK(FNQ1 ) : POKE FNQ1 , ま も 6F :POKE FNQ1 ,R1
MUSIC T1P6<:IF (CR1= 多 ?Z)+〈R+= 多 の 2D〉))xCD(E,5)=6)*〈B(E5,5)=9) THEN GOTO 14S56
NEXT Z
LET いり =3:GOSUB 2569
LET R1=T(E5,E)+1
IF R1>6 る THEN GOTO 1439
IF R(18+R1)<INT(RND(6)+1) THEN GOTO 146 る 6
LET 0=?-R1+1zIF ロ <1 丁 HEN GOTO 14S568
LET 0=0-5:GOSUB 2216
IF 01= 多 4E THEN GOTO 146 る 9
LET い =4:GOSUB 2569
IF 01= 多 4D THEN LET D〈E,3)=】 :LET CURSOR=24,2xE:PRINT "Mj
IF 01= 多 4 る 6 THEN GOSUB 1489
IF 01= 多 44 THEN LET D(E,Z)=1 :LET CURSOR=26,2*E:PRINT "D" jiPOKE D(E,1)。D(E。 る
IF (D(1 。Z)=1)\(D(2。Z)=1) THEN GOTO 2Z36
NEXT ES5:RETURN
LET いり =5:GOSUB 25349
GOTO0 14S59
IF D(E,?)=9 THEN LET D〈E, ヶ )=1:LET CURSOR=39 ,2*E-1:PRINT "の "3 TB(C 2Z) j CHR も く
る る 6) : RETURN
1 4?6
1596
15169
1529
1539
1546
15S569
1569
1526
1589
15?9
1 699
1 る 16
1 629
1 639
1 る 49
1 659
1 669
1 る 2Z9
1 689
1 426
1Z99
1Z18
1Z209
1 Z39
1 Z49
1 Z59
1 2 る 9
1ZZ8
1 Z89
1 Z め 6
1899
1819
1829
1839
1849
1859
1849
18Z9
1889
18?9
1 ?86
1 め 19
1?29
1 ?3@
1?49
1?56
1 る 9
1?Z9
1 ?8@
1 ??8
2999
2916
2929
29 39
284@
2959
2 る 9
29Z6
2989
29 め 9
LET DCE,4)=1:LET CURSOR=25 , 2xE:PRINT CHR を も (を 4 る ) : RETURN
REM DM FIGHT
LET CURSOR=12。23:PRINT "DH-FIGHT"
IF CD〈1,4)=1)*CDC2。4)=1) THEN RETURN
LET E=1:IF (DC1,4)=1)+〈D(1 。Z)=1) THEN GOTO 2139
LET CURSOR=21 。18:PRINT "DM" jiEi" FIGHT" ji
LET CURSOR=21 ,12:PRINT "コウ ァ ヾ キモ フク ヒョク" 』TAB( 35)
LET E5=FNK:IF FNK= も 5 THEN MUSIC T1P2Z<:GOTO 2139
LET E5=E5-$39 :IF CE5>9)*CE5<5+1) THEN GOTO 1529
GOTO 15<9
IF BCE5, る )=1 THEN GOTO 1569
MUSIC P:PRINT E5j:LET CURSDR=21 ,21 :PRINT "コウ クー キネ フキ" TAB( 35) j
IF CFNK= 多 31 )xCDCE,8)=9) THEN LET E3=1:LET C2=59:GOTO 1649
IF CFNK= 多 32) CDCE,?)=9) THEN LET E3=2:LET C2=39:GOTO 1649
GOTO 16<196
MUSIC PiPRINT E3j:LET T5=D(E,1):LET ※=FNT1:LET Y=FNT
LET T5=B(E5 1) :LET X1=FNT1 :LET Y1=FNT:IF DE,1)=B(E5,1) THEN GOTO 1y89
LET X3=XーX1:IF X=X1 THEN LET X3=.91
LET Q=ATNC て Y-Y1) ノ /X3) :LET C=ABS(Qx189 ノ PAI )
LET C1=2Z:IF (DCE。6)=2)+〈D(E, る )=5) THEN LET C1=9
ODN DE,6) GOTO 17Z969,1726 ,17Z49 ,1789 , 1899 ,1839
IF X-X1<9 THEN GOTO 1869
GOTO0 12Z59
IF Y-Y1<= THEN GQTQ 1869
GOTO 1819
IF X-X1>8 THEN GQTQ 1869
IF Y-Y1<@ THEN LET C=-C
GOTO 1859
GOTO 1869
IF X-X1>9 THEN GOTO 1869
GOTQ 1849
IF Y-Y1>=9 THEN GOTO 18< る 9
GOTO 1859
GOTQ 18<@
IF X-X1<9 THEN GOTO 186@
IF Y-Y1>6 THEN LET C=-C
IF 〈C1-C2<C) CC<C1+C2) 丁 HEN GOTO 18Z@
GQTQ 12< る 9@
IF C>45 THEN GOTQ 1929
FOR Z=X TO X1 STEP SGNXX1-X)
LET R1=PEEKCFNQ) : POKE FNGQ, ま る F :POKE FNG。,R1
MUSIC T1P8 く <:IF CCR1=?Z)+ て R1= ニ も?D))*CD(E。5)= ニ 9)*〈BCE5,5)=@) THEN GQTO 1?<9
NEXT 2Z:GOTO 1?89
LET 0=ATNCCX-X15 ノ て Y-Y1)) :FOR Z=Y TO Y1 STEP SGN(Y1-Y)
LET R1=PEEK〈FNQ1 ) :POKE FNQ1 , も る F :POKE FNQ1 ,R1
MUSIC TI1P6 く <:IF (CR1= あ ?Z)+(CR1= ニ 多め D))*CDCE。5)=9)x〈BCE5,5)=9) THEN GOTQ 1 くる 9
NEXT 2Z:GOTQ 1289
LET いり =2:GOSUB 25<9
GOTO 2139
LET いり =1:GOSUB 25<@
LET R2=T〈(E5,E)+1
IF (E=1)*CR2>=6) THEN GOTO 212@
IF (CE=2)*CR2>8)*CR2<19) THEN LET R2=8
IF (て E=2)*C〈R2>18) THEN LET R2= ゥ
IF RC2*CE3-1)+R2〉 く INTCRND( 6)+1) THEN GOTQ 2126
IF E3=1 THEN LET =8-R2
IF E3=2 THEN LET 0=13-R2
IF 0<1 THEN GOTO 219%9
LET 0=0-5:GOSUB 2219
IF 01=*4E THEN GQTO 219?9
LET り =4:GOSUB 256@
2199 IF 01= 多 4D THEN LET B(E5,3)=1:LET CURSOR=24 ,5+ES:iPRINT "Pi
2119 IF 01= ま 46 THEN LET B(E5,4)=1:LET CURSOR=25 ,S+ES:PRINT 2
2128 IF 01= 多 443 THEN LET B(E5, る )=1:LET CURSOR=26,S+ES:PRINT "D" ij:GOSUB 21 く る 9
2139 GOSUB 25569
2149 IF (CE=1)xCD〈2。9)=9)*X〈D〈(2,Z)=9) THEN LET E=2:GQOTO 1S49
2159 RETURN
21 る 9 POKE BE5,1) ,B(E5,2) iLET B(E5,1)=6@
217Z9 し LET B2=B2-1 :LET S=S+1:IF B2=9 THEN GOTO 2646
2189 RETURN
21?9 LET い =5:GOSUB 25696
2299 GOTQ 2139
画面 デー タ 続 き
3569=86
3568=BA B3 86 BA B3 B9 DE 86
3579=86 29 C9 DE B8 DE D7 D1
3578=29 29 29 86 2 20 2 29
3589=86 29 D8 AE B8 86 2 29
3588=B1 C2 86 BZ7 D8 AE B8 86
3599=86 42 5B 31 2D 35 5D 29
3598=29 29 29 8A 85 85 85 85
35A9=89 85 85 85 85 89 85 85
35A8=85 85 89 85 85 85 85 88
35B9=86 2 CC DE DB AF B8 CD
35B8=AF C4 DE 86 44 4D 29 31
35C9=86 29 29 35 29 86 29 29
35C8=35 29 86 2 31 32 2 86
35D9=8A 48 45 58 85 85 85 85
35D8=85 85 85 88 44 4D 29 32
35E9=86 29 2 35 2 86 2 29
35E8=35 29 86 29 31 32 20 86
35F9=86 FC F7 9D 2 D3 D8 29
35F8=29 29 2 86 42 48 29 29
3699=86 2 29 34 2 86 29 29
3698=35 29 86 29 29 39 29 86
3619=86 FD 9D 9D 29 29 29 290
3618=29 29 29 86 2 31 2D 35
3629=86 29 2 29 2 86 20 29
3628=29 2 86 2 29 20 2 86
3639=86 97 97 FD 29 BS B6 269
3638=29 29 29 8A 44 41 4D 41
3649=47 45 AS 4D 45 53 53 41
3648=47 45 8B 85 85 85 85 88
3659=86 97 97 FC 29 2 2 29
3658=29 2 29 86 A5 44 2D BB
3669=DE DD B6 DE B2 2 CB AE
3668=B3 BC DE 2 2 29 2 86
3679=86 FC F7 FD 2 CD B2 C1
3678=29 2 29 86 AS 46 2D BE
3689=DD C4 B3 CC C9 B3 2 CB
3688=AE B3 BC DE 29 29 20 86
3699=86 FD 29 FC 2 2 2 29
3698=29 29 2 86 A5 4D 2D B2
36A9=C4 DE B3 CC C9 B3 29 CB
36A8=AE B3 BC DE 29 2 20 86
36B9=86 29 F7 29 2 29 29 20
36B8=29 29 2 8A BA B3 B9 DE
36C9=B7 A5 B2 C4 DE B3 2 C6
36C8=29 C2 B2 C3 85 85 85 88
36D9=86 2 29 29 29 2 20 20
36D8=29 29 29 86 6F B2 C4 DE
36E9=B3 3A B2 C4 DE B3 BD D9
36E8=E9 CA A4 B2 C4 DE B3 86
36F9=8A 4D 41 59 85 85 85 85
36F8=85 85 85 88 BD D9 CE B3
3799=BA B3 C6 D1 BZ7 A6 B6 B4
3798=C3 A4 BF C9 CE B3 BA 86
3719=86 2 D6 BA 3A 39 48 45
3718=58 209 2 86 B3 C6 B2 C4
3729=DE B3 BD D9 Al 2 29 29
3728=29 29 2 20 2 2 20 86
3739=86 29 C9 C3 3A 38 48 45
3738=58 29 2 86 4B 45 59 29
3749=4E 57 2 4E 29 4E 45 29
3748=53 45 29 53 29 53 57 86
3759=86 69 69 69 6 69 69 69
3758=69 69 6 86 D1 BZ 81 7C
3769=29 31 29 32 2 29 33 29
3768=29 34 2 35 29 20 36 86
3779=86 69 FC F7 FD 29 FC FZ
3778=FD 29 FC 86 B2 C4 DE B3
3789=29 51 2 57 2 2 45 29
3788=29 44 29 53 2 2 41 86
3799=86 69 FD 29 FC F7 9D 9D
3798=9D F7 FD 86 6F BA B3 B9
37A9=DE B7 3A 31 2E BA B3 B9
37A8=DE BZ7 BD D9 BI B2 C3 86
37B9=86 69 FC F7 FD 29 9D 9D
37B8=9D 9D 9D 86 A6 C6 AD B3
37C9=D8 AE B8 29 4B 45 59 5B
37C8=31 2D 35 5D A4 32 2E 86
37D9=86 6 FD 97 97 F7 9D 93D
37D8=9D 9E 9D 86 BA B3 B9 DE
37E9=B7 CC DE BZ7 A6 C6 AD B3
37E8=D8 AE B8 29 4B 45 59 86
37F9=86 69 FC 97 97 29 FC 9D
37F8=9D 9D 9D 86 5B 31 2D 32
3899=5D A4 B1 C4 CA B5 C9 C9
3898=BC D9 2 21 21 2 29 86
3819=81 85 85 85 85 85 85 85
3818=85 85 85 85 85 85 85 85
3829=85 85 85 85 45 78 79 6C
3828=61 6E 61 74 69 6F 6E 82
3839=69 69 69 69 69 69 69 69
3838=69
シミ ュ レ ーション DM GAME の 続き
IF 0<@ THEN GOTO 2256
IF 0>3 THEN LET 0=3
LET 02=INT(RND( る )+1 )
LET 01=ASC(MID ま (ID まく ロー ロ 。 る 6) 。02 。1) ) : RETURN
IF 0<-4 THEN LET ロ =ー4
LET 02=INTCRND( る 6)+1)+INTCRND( る )+1 ) 一 】
IF 02>5 THEN LET 01= ま 4E:RETURN
LET 01=ASC(MHID ま MID も (も 2ー0,5) 。 2 。1) ) : RETURN
FOR 』=12 TO 16:LET CURSOR=24 。 1 :PRINT "
"gsiNEXT
FOR 】=1 TO 2:IF D(1 ,Z)=1 THEN LET =I+1
LET TS5=D(』,1):LET 丁 1=FNT1/2:LET T2=INT(FNT プ 2)
FOR 』1=1 TO 5:IF B〈1】1. る )=1 THEN LET CURSOR=29+Tx4。11+】1:PRINT ""j』:GOTO 232
LET T5=B(1』 1 1):LET 丁 3= テ FNT1 ノ 2:LET 本 4=INT(FNT ノ 2)
LET T( 11 。】)=SQR((( 征 3-】 ) *2)^ へ 24((T4-T2) *2)^2) ノ 2+D(】。5)+B( 1 1。5)
IF T(I1,】)-INT(T( エ 1 1))>.Z THEN LET TI1, エ 1)=T(I1。1)+1
LET TI1,!)=INT(T(I1。1』))
IF (DI,5)=B(I1 5))wCD(】 ,5)=1) THEN LET TI1 。】)=T(1I1。】)-2
LET CURSOR=29+Ix42。11+I1:PRINT 本 (Ii1。1)i
NEXT 1】1
IF D〈(2。Z)=1 THEN GOTO 2426
NEXT 1』
FOR 1!= る TO 19:LET CURSOR=2Z 。!:PRINT "
"siNEXT Ii
FOUR !=1 TO 5:LET CURSOR=28 , 5+ 』
IF BC(』, る 6)=1 THEN PRINT " "ji:GOTO 246 る 8
LET TS=B〈T 。1):PRINT INT(FNT1/2) j INTCFNT ノ 2)
NEXT 』
FOR 】=1 TO 2:LET 5=D〈T 。1):LET CURSOR=28 , 2*I:PRINT FNT1/2j』 INT(FNT ノ 2) 』
IF D(』 エ 。2)=1 THEN LET CURSOR=28 , 2xI iPRINT “""』
NEXT 』
FOR =】 TO Si:』F BT, る)=9 THEN POKE BI 。1) , を 42
NEXT 』
FOR =1 TO 2:IF D(】。Z)=8 THEN POKE DI 。1) , を 44
NEXT 』
RETURN
FOR 』=18 TO 22:LET CURSOR=21 ,I :PRINT “
GOSUB 2559
FOR J5=1 TO 1
LET K=9:FOR 』=9 TO 3:LET CURSOR=21 ,18+】:FOR 1I1=9 TO
IF K=LEN〈 ト NH1 も ま ( り ))+1 THEN GOTO 2639
IF 人 ASC(MID も (1 て りう) ,K。1)) く > まあ 28 THEN MUSIC 本 1P8<
PRINT MID ま (1 ま ( り ) 。K。1)
LET K=K+ 1 :NEXT 1:NEXT 』
NEXT JS5iRETURN
REM NEUI BH
FOR =1 TO 5iFOR 】1=1 TO る :LET BKX1,】1)=9 :NEXT Ii1iNEXT 【
FOR 1!=1 TO Si:LET G=2+INT(RND〈 の ) ) *2
LET G2=3:』F G=INT(GZ4)*3 THEN LET G2=4
LET G1=G2+2XINTCRND〈Z) ) :LET G3= も 199+G+G1* 和 も 20:LET G4=PEEK(G3)
IF (G4= あ 44)+(G4= ニ まあ 42) THEN GOTO 2<89
IF G4= も ?Z THEN LET BI ,5)=1
LET B(】 。1)=6G3:LET BI 。2)=64:POKE G3, ま 32 :NEXT 1】:GOSUB 2229
FOR 1=6 TO 19:LET CURSOR=24 。 』 :PRINT "
LET TIME=9 : RE GAME END
IF TIME<3 THEN GOTO 2Z49
MUSIC T4P6Q4B ラ ラ シ レ P5 析 フ 欄 フ ソソ ロ 9T 1
GOSUB 2559
IF S<=8 THEN LET い =Z
IF S>8 THEN LET い = ム
LET TINME=9 : GOSUB 25Z8
IF TIME<5 THEN GOT0 2899
GOSUB 255@g
IF S>S】 THEN LET S1=S
LET CURSUR=22 , 1】:PRINT "タオ シク テキ "i
LET CURSOR=23 ,29 :PRINT "SC-" jjS』:LET CURSOR=23 ,21 :PRINT "HI1-"
IF TIME〈Z THEN GOQTO 2858
GOTO 1648
に 4 コロ E エ ネエ テ ミ ネ ネネ テテ テテ 2:
REM ※ シ ミュ レー ショ ン DM テ
REM * BY.RURERU テ
に 1 コン ええ ミネ ネエ ミネ ミネ テ ミズ テ 】
2/30-286600 ゲー ハエ ンド 負 理
3290 て お 352F タイ トル 画面
と
お 3530 て お 382F 説明 画面 デー
タ
3830 て お 3B2F ゲー ム 画 面 デ
デー ダ
田 チ ェ エッ クボ イン ト
わ お ! バ ベー シッ クマ スタ ーJr
の シミ ユ レ ーション ゲー ム だ 。
な か な ガ 良 て で き て いる ぞ |
マシ ン 語 部 の リス ト を 見 て 「 う
ーー む 」、 と 思 つ だ 人 も いる だ ろう
けれ ど 、 な ん の こと は な い 、 全
部 画面 の アデ アー ツタ な の だ 。 間 違 つ
て も 胡 走 は な いけ れ ど 、 画 面 表
示 が お か し ぐ な つて し まう か ら
一 訪 注 意 し て 入力 し よう 。 そ れ
より も BASIC 部 リス ト 中 の "P
OKE' や CALL" の 値 を 間違わ
な いよ うに 。 ど ご どこ か に 飛ん で 行
つて し まう から ね 。 ち な み に ぶ お
F009 番 地 は モニ ター の デー マタ
プロ ッ ン 転送 け プ ルー チン な の
だ 。 つ まり 画面 デー ツタ を テキ ス
トモ ー ド エリ ア に プロ ツノ 転送
し て 画面 表示 を し て いる わけ だ 。
他 の 機種 で も この 辺 の こと が わ
ガ る 人 な ら 移 植 し て みて も いい
だ ろう 。 廊 ウム ム ム …… バッ チ
リ 賞 。
"ENEXT 】 RETURN
"siNEXT IiLET B2=5:iGOTO 3459
5S1:LET TINME=8
※ 注 入力 は で きる だ け
省略 形 を 使用 し て くだ さき
い 。SAVE は まず $3290
ー$ 3B2F の 画面 データ
を モニ ター コマ ンド で S
AVE し て 、 次 に BASIC を
SAVE し て (だ さい 。
LOAD は 、 画面 デ ゲー タ 、
BASIC の 順に 。
6
ロ ズ ビ ロ い ば ワ
hA
ばば か tfRT
の
( 朋
お の 呈
へ つれ うれ かさ
用 (用 (H
Q ゅ
いや
部
Ace
4
4
を
ーーーー……、
<
好
絆
英
を
づ
機
も |
や
つ
つ
げ
だ
る
0 ue Gr キ
の
9
画面 デー タ 続 き
3849=60
3848=64
3859=69
3858=60
3869=69
3868=31
3879=69
3878=20
3889=20
3888=29
3899=69
3898=F7
38A9=F7
38A8=32
38B9=60
38B8=20
38C9=20
38C8=20
38D9=60
38D8=F7
38E9=F7
38E8=20
38F9=69
38F8=20
3999=20
3998=20
3919=69
3918=F7
3920=F7
3928=20
3939=69
3938=20
3949=20
3948=20
3959=60
3958=F7
39609=F7
3968=20
3979=66
3978=29
3989=20
3988=29
3999=69
3998=F7
39A9=F7
39A8=74
39B9=60
39B8=20
39C9=20
39C8=29
39D9=69
39D8=F7
39E0=F7
39E8=29
39F9=69
39F8=20
3A99=20
3A08=20
3A10=60
3A18=F7
3A29=F7
JA28=29
3A39=69
3A38=20
3A49=20
3A48=20
3AS59=60
3A58=69
3A69=60
3A68=6F
3A79=60
3dA78=60
3A89=69
3A88=20
3A99=44
JA98=29
JAA9=20
3AA8=20
3AB9=D1
3AB8=20
3AC9=31
3AC8=20
3AD9=20
3AD8=20
3AE9=32
3AE8=20
3AF9=20
3AF8=20
3B99=35
3B98=20
3B19=20
3B18=6F
3B29=20
3B28=85
ガー と ンズ ペー ツン 0 EEEH33SSsss
ー。 リ プレ イ は Retry ?" の と き に 、
[YIENTER | と すれ ば OK。
[2I8| キ ー で 上 下 に よ け な が ら 、[4[6] キ 敵 キ ャ ラ 1 パタン ご と に 3 機 ず つ 攻
ー で 照準 を 敵 機 の 直前 に あわ せ 、 [2 撃 し て くれ る 。 こ れ を 5 パタ ン と も 、
ー で 撃ち な と し て 〈 く れ 。 敵 機 と 自 機 の 切り ね けた ら 1 面 ク リア 。 次 か ら は 1
ヽ さ 位置 が あっ て な いと あたら な い ぞ 。 > パタ ー ン ご と に 2 機 ず つ 増 えて 面 クリ
遊び 方 自 機 が 4 機 や られ る と ゲー ム オ ー バ ア は どん と どん 難し くく な っ て いく ぞ 。
いつ も な が ら 、PC-1500 の 機能
フル に 活用 し た スペ ー ス ・ シ ュー ティ
ング ・ ゲ ー ム 。 し か も 、 い ろ ん な キャ
ラク タ ( 下 の 図 ) が 登場 する し 、 そ れ
ぞ れ 攻撃 パパ ター ン が 違っ て いる ん だ か し aa
ら め い っ ぱい 楽し め る ぞ 。 4 ム 左 の 数 字 は SCORE。 ド ッ ト は 左 か ら 自 機 数 、 パ タン ご と の 残り 敵 機 。
左 に ある キャ ラク タ が キミ の 戦闘 機 。
右 か ら 敵 機 が ミサ イル を 撃ち な が ら キ
ミ の ほう に 向かっ て くる (な か に 1 つ
攻撃 し て こない 敵 も いる ぞ ) キミ は 、
。 叶 WWAJ
湖 は ……」 ry ふと ry
SE
6
we
デン s
で
ピン
た
ぜ
な
ん
1
し
。
。
ソ
て
+
。et94 て 癌 洗 抽 FSS 苦 S と ゃ び
は 。 叶 AS ひと は ひる び て で は 互 五 区
生 民 名 論 ニー 汰 ささ d 宮 有
9
ーー
の
計
どき > 時 rr 「 へ は と
。*t9t
ee と で て 清き 語 は (人 半 NY
う
ざ 6
1 : =3: = N= ニ 2 マニ
ノ 24: し =12:G ロ =2:P=
3:0N ERROR
GOTO 3:CLS :
GOSUB 59
3 回 科せ RIO。 日
: GOUSUB 1P:
CURSUR Li:
GPRINT 9: 2$=
INKEY$ : [F Z$ く <
>"FGOUSUB 6
4:GOUSUB 11:[F >
=QLET = り g:
GCURSOR 22 フ :
GPRINT 2^Q- 1
NEXT T:EF=E+1:
GOSUB 9: ロロ =Q+2
sGUTOU 2
328 暫 罰 TU 3
2 1F /2$="/"50SUB
11*GOUSUB 39
ノビ ラ ( (の まる "も" う =《Z
まり 2 ボク グ ミ
CURSOR L:
GPRINT gk:L=L+F
: IF L く <20R L>24
LET 1 し ミ し ー ド
8:F ニ (/ 和 まず ="2" )-(Z$
だ で お" うる N= ニ N キ 1F
N く 10R N>3LET N
=N-F
: RETURN
1 り :CURSOR 5
GPRINT @$(N)s
RE TURN
11:0N TGOSUB 12, 1
5 2 フク 29 6
LURSGR YY3
GPRINT @$(T*※3+
5): RETURN
12:CURSOUR YiPRINT
し 1 展 NRH 当 誤 4
GOUSUB 4
133 上 上 Y\ ョ 24 ル ET1 日 =
RND 3
1 5 ヤミ Yー15 1 上 Y ョ 6
LET Y=24:
CURSOUR 22PRINT
1!
CO ト O)
15: RETURN
16:CURSOR YiPRINT
。 ・ IF _RND 6=2
GOTO 4
12:【F Y=24LET G=
KNU 3
18:[F Y<8LET Y=24
:CURSUR 6:
PRINE
1d:Y=Y-2iRETURN
29: G=RND 3 ヵ :CURSOR
NSPRINIL "ekE
Y く グフ LET Y=24:
CURSUR 6IPRINT
21:Y= ニ Yー12RETURN
22:[F_RNDU 6=5
GOUSUB 43
2 間 2
43:
5:
_FAITAS
: BEEP 1, 255, 9# 0
=RND 3:CURSOR
YiPRINT " は Y=
RND 6+12:
RETURN
:・【F_ KRND 4=3
GOSUB 49:GOSUB
43
: 1 ヤッ メン ノン LE[ (ご
RKNU 3:Y= グ ノン
: BEEP 1 255, 16:
LURSOUR YiPRINT
すま 小 SNZLEM
Y=2 ク 2
:Y=Y+RND 4-3:
LURSUR 24*
PRKJNT ) の *
KRKETURN
:FUR 1=6TU L
STEP 2』CURSOR
1iGPRINT QNO
BE 選 、 よ 上 1.8
LURSOR 1-2:
GPRINT 9iNEXT
1。【[F L=YRND N=
LE 1 ミニ ミ Y ぅ 5 ら ミ 5+1
s+ 1 GOUSUB 6
|
: CURSUR LIPRINT
「 "iRETURN
記 則 引 抵 選 。 旧 よ 9
CURSOR Y:
GPRINT @$(T*3+
G):FOR J=Y-1TO
6STEP -2:
CURSOR J:
GPRINT @(G)# 2$
=INKEY$ :GOSUB
2: GOSUB 19:
CURSOR J:
GPRINT 9:NEXT
J
: CURSUR YiPRINT
2 。 まま 江 選 [ 問 二 EE 1
2 陸 負 に Aa か
GOUSUB 69:
GCURSOUR 25:
GPRINT 2^P-1:
[F P<9GOTO 199
RE TURN
CURSOUR Ys
GPR1NT Q$(3* ネ †+
FOUR J=Y-1TD
5STEP -1:BEEP
1, 1:G=RNHU 332Z$
=1NKEY$ :GOUSUB
ZXCURSHR J:
GPRINT @(G):
GOSUB 1 ぼ 9:
CURSOUR J+2
:GPRKINT 9INEXT
JiCURSUR フォ *
GPRINT giGUTO
4 1
CURSOUR 3:PRUSE
"FRITRS II 2E=18
っ = り , = : B ニ 8: し =
64:MRIT Pi
PRUSE "TOUP jjX
$jH
621
9P:
199:
: ロ $=" り 1929393g2
り 1 り 1 ':B$="983E
1C1C149898": し $
=" 492969692949
49':$=" り 919193
り 69 ノ 93"
: 上 $=" 98981C363E
1C"iF$="4949 り 6
3g2g69「: GO$=" り 1
り 19292292"i 日 $
=" り 898143E3E 1 4
11
:[$= ニ "49492929 ノ 9
29 "1 」$=" り 19 り 296
92gBgE " : K$=" 98
14363ES5D フ 2 ノ "1 し ま
=" 492939296838
: 1$=" り 4959EBF9B
"*N$="222 フ ノノ F
っ D's 0$= "195938
ノ 868“
: P$ ま =" 9292969UgD
り 939D9E"Id$="14
14366B6B1C6B ノ ノ
「: KR$=" 29293958
っ 86 り 5838『
GUSUB 393
RETURN
:FOUOR 1=1TU 3:
FUR J=1TOU 38
BEEP 1i:CURSOR
0:GPRINT "981C
り 9899":CURSOR 0O
: GPRINT "98261
6"iBEEP 1
CURSOR 0O
:GPRKINT "461613
281843"sNEXT J
*NEXT 1sMRIT
・ CURSUR Y:
PRINT ! "iv=2
4:CURSOR 1:
PRINT S:
GCURSOUR 2 ノ s
GPRINT 2^(Q-[1)
SA
RE TURN
CLS sFOUR 1I=6TD
24:CURSOUR 1
GPRINT B$:
LURSOUR 1 ユ -1:
PB 民 RINT " "SBEEP
1, 33, 235NEXT 1」
: CURSOUR 8:
PUSE "Round "5
Es CLS
ELS #GPRINT “4
ノ 4321992 フ F41731
罰 税 ま INT 5
GCURSOR 25:
GPRINT 2^P-1, 2
^Q ロ - 1 :RETURN
PRUSE "The END
SCURE "51 【F
S>HLET H=Ss
[NPUT "You are
TOUP! 。 name"jX
$
:【NPUT "Retrug?"
の $).1E Z ま ="YP
GOTO 1
ピオ ンズ 』」 の ゲー ム 化 。 キ ミ が 騎 才 に な つて 、 競 馬 の 大 障害 競走 を 走り 抜く て の だ 。
(99 チャ ン ピ ビオ ンズ PONYCA = ポニ ー (分 03-265-6377) MSX(32K) 〇 テー プ \3.500 @ こ の 夏 公 開 さ れ だ 映画 「 チ ャ ン
、 ヽ ン シェ シ
の ど だ Z ル 7
の ど /7 戸 了 7 ア 7
男 変 数 リス ト
O…- 各 / パ ツン に お ける 加 墜 レ
な けれ ば な ら な い 数
M-…・- 名 パパ ツン に お ける 加 墜 さ
れ だ 相手 の 数
XN-…- 自 機 の XY 座標
YOG-…… 相 手 の X,Y 座 標
し …… 明 準 の X 座 標
P…… 自 機 の 残 つて いる 数
ヒ ーーー・ 面 数
5 ーー スコ アル 用
AB.C,…… ミ サイ ル 表 示 デ ー タ
(Aー 上 日 中 CO 一
下 ) II II
X$…-- 名 前 入力 用 HH
ws MY イ スス ョ コア キサ 4
AS,BS,C③,…… 自 機 表示 用 デ 。 條 時
ー タ (A お 一 上 日 お 條 人
ー 中 CS 一 下 ) TH
DS,.E$F……/ パ タン 1 英 表示 伸和
ーッ LTTLTI
GS.HS,$…… バ タン 2 敵 表 示 鍛
カー タ Q
JS,K$L お …… リ パタ ンコ 英 表示
デー タ IL
MSINBOB…… リ パタ ン 4 英 表 ( 生
示 デ ー タ |
PB.OSR$… ソ バタン 5 届 表 。
示 デ ー マ 湖
3 CCPPP パダン 数
ノ ゃ < エー 人 入力 用
O-…・- 爆 発する X 電
F…… キー 判断 用
還 プ ロブ ラム の 説明
1- 5 初期 設定 と メイ ン ル
シン
6- 9 キー 判断 ルー チン
10 自 機 表示 ルー チン
11-- 27 相手 物 動 ルー チン
30-- 31 自分 の ミサ イル
40- 42 相手 の ミサ イル
43- 44 相手 の RND ミ サイ ル
50- 55 初期 ルー チン
60- 62 爆発 ルー チン
90- 91 デモ ルー チン
100~101 ゲー ム オ ー バ ー
還 チ ェ ッ フ ボ イン ト
相 ま の 攻撃 は 、 な か ガ な か し つ
こぐ 最初 の うち は 、 な か ガ な か 敵
を 破壊 で き な い ね 。 敵 の 攻撃 を
少な ぐす る に は 、12・16・22・
24 行 の RND の 値 を 大 きく すれ
ば 、( 例 えば 12 行 IF _RND 16
= ノー) よ い 。 自 機 の 残り 数 は
な の で 、 1 行 の 値 を 大 きく し て
も いい ガ が な 。 そ れ か ら 、 ラ ンド
クリ ア の 時 点 で 自 機 の 残り 数 を
増し て も いい ね 。4 行 の GOSU
B 90 の 前 に ピ ミ ロ + 1 : を 入れ
よう 。 支 バ ッ チ リ 賞 。
ざ Z
な ん と PB-100 で パパ チン コ が で きる
の だ // 画面 は パチ ンコ 右 の 一 部 を 上
か ら 見 て いく っ て 感じ 。 し か も 、 吾 は
全国 的 に (18 歳 以上 の な と な の あい だ
で ) 人 気 を 集め た スリ ー セ ブン な の だ 。
最初 に 1 一 4 の 耕 の うち 、 ひ と つ を
選ぶ 。 こ の うち ひと つが よく 出る 訓 で
- ほか は あま り 出 な いよ う 仕組 まれ て い
る の だ 。READY ! と 表示 され 、 玉 が
左 か ら 飛 ん で きだ た ら 、 好 き な と ころ で
スペ ー ス ・ キ ー を プッ シュ (か わり に
国 を 押す と 、 持 ち 玉 と 残り タイ ム 表 羽
玉 が 下 に 落ち は じ め る 。 玉 が セー ンプ 容
(V) に 入る と 5 発 増え 、 6 段 目 の モ ー
ジグ 穴 だ つう だ ら 、 ぷよ いよ ラ ィーノ テ だ 。
画面 が ルー レッ ト に な る の で 適当 な キ
ー を 軽く 押し て 1 つ ず つ 止 め よ う 。 7
が 1 つ で も 出る と 5 発 打つ あい だ 8 段
デン
oc で
へ 下 琴 計 蜂
誕 情 e 誠
一 ③ 涯 当 汗
ー の で さて 可 ③ は さき は まで て 沸 V 四
ン <w 避
最
近
ノバ
テ
4
っ
て ヒ
トン
私 ボ
も |
ど ル
うな
し と
て の
も ン
の 。
ASw ン サー 革 SS と ン 交 (TSN 本
へ 遇 。 人 AT は Je どき 光 へ 滞 き は い
N ロ NO kw は eSO 寺 GO ご
We
ピン
目 の ポ ケッ ト が 開き っ ぱな し に な り
7 が 全部 そろ うと 最後 まで 開い た まま 。
持ち 玉 は 25 発 で 、 玉 が な く な る か ^、
タイ ム が 0 に な っ だ ら 65、 ゲ ー ム 終了 。
300 発 出す と 打ち 止め だ が 。 スコ ア は 持ち
玉 の 残り プラ ス 残 り タ イム 。
ム ^ ち よっ つと お し か つた だ けど 、 そ れ で も フ Z ガ が 出 た /
4A ム ちえ つ / せつ か ガ ぐ 開い を の に は ずれ て し まつ だ 。
16 PRINT "TIHY FEW
ERViT25:S=160
16-9:E=B=o*
09UB 9
28 PRINT "HE
50SUB 約
19 INPUT " 還 護 134
YiIF TaiTFT
54 THEN 58
49 BOTO 39
58 <=INT (RHH41
HH 時 25TF = 時
1
39 PRIHT "Readyili
09UB 9
33 IF Tz9 HHEN 灯
23 iF fs300 THEN
すげ 了 53=8 『HEN 約
1 HH=115=5-1:P
RINT LSR 昌
LR 1 TP
9 PRINT ESR Hi"0"
5 計上 上 = 5
EEF EET に" | HEN
ミ ゴ
iz ま F KEY= ニ "= THEN
3
139 放 叶 ciPRINT ES
R 時 Hi
iF 9 THEN 1
iTO 119
199 TF INT 【RHN)
ti=HiiF Ri 時 間
「 還 こ
と
1 FET IFRHN 失 時
+1= 有 HH).5 時 ピ
Fe
9 FRHE【HZ23=M
i =1
2 Bs PRINT iPRIN
抽 証 に E に に 本
「 HESR HiB$j iR0S
UB
1 3 0 レ も
<・・iiPIESR 昌
89: 0SUB 5 絢
195 9=25PRTMHT 『!・
EZ2TEESR 昌
jin0SUB 5
:99 DsPRINT "『*・
ロロ 。 *15*IESR 昌
j8$3 : ロ USUB 5
z9O D=4sPRINT "Tyx
yi4TYESR 昌
9 : HOSUB 5
dEF Hi iREN 35
215 =JiPRINT "【・・
を BLSR H
Bi ipOSUB 5
の ゲーミング") Murder.Anyone ? つ レ ー ザ ー デ ィ ス ク 株 式 会 社 (人 な 03-494-1111) 〇 PX- 7 +LD-700( レ ー ザ ー デ ィ ス ク ) 〇 テー プ +LD
ッッ ん / Y9.800 @ 迫 力 あ 実写 画面 で 楽し め る 、 ミス テリ ー ジ ド ペ ンチ デー
TINY FEVER
9 D=hsPEINT "『・
Ve ・ iD ELGR 昌
ji:hOUSUH 5 晶
zzo jiF コロ 1 『HEN 93
ェ 3 0=fRPRINT "・・
1 5LSR 昌
:B ま in0S 地 5 開
asa D=HsPRINT ! ほ ・
ここ Y IGPL5R H
1 H5
彰 FE ュ 15 0 ES
3 WV 5LSR H
HB
45 nUSUB 0
z99『F ロコ 1 『 有 FN 93
zaJ DIPRTWT "TL _
SE
人 pUSUB 5 昌
iEF MiE=
」
3 PRIHT :PRINT _B
HLPiiisn ロ 0SUB ます
3 PRIHT "は 計 :
3j: ロ USUB #9i50T
15
3 0TO D*5+55
395 BUTO 50
319 5UHTU 618
315 HUTO 5 旨
JzB RONTO 3
szJ BUTO 515
339 GUTO 9 昌
3sJ UTO 535
3 犠 BUTO 545
345 BHTO 569
3J# RUTU 5
599 F 11HZIHOTD
衣
5 」F H=9iH-8BUTO
衣 じ
1 HHRN 「R 符 -
jjUTO 『 昌
1 FE キキ 1 『HEN 8 商
578 jiF H=9 iHFN 6
539 ロ OTO 518
539 』F HH に 5 THEHN 8
54W ロ UTD 5
545 iF H=Z THEN 518
5J9 」F HH THEN 518
559 RUTO 80
5b9 F Es1iIF Ha4i1
F Hzb 『HEN は 昌
5pJ HUTD 『 暗
5 jiF 中 5 『HEN i96
ni PRINT LSE HiB$:
F 叫 0
HEAT 上
509 PRINT ESR Hi"_"
レー ザー ディ スク を 使っ を ミス テリ ー ア ド ベ ンチ ャ ー
59J H=HTS 圧 (5-HjB
TO 5j
FOR FE TO 3iE
i FiPEINT : 姓 T
KR
3 「=T+Si に 1EPRINT
LSR HI ViIF
415iF 上 和則 : 上 キー
382 IF D45 THEN 798
63 IF 時 1 THEN 799
195 50SUB 796:PRINT
LSR 3 "StaFtE"
jinUSUB 約
318 BUTO
3 拉 BUTU D*1B+99 失
338【F HN25IF HH T
FN 519
34# FRHNKH18 FH
に 時 す 人 人
345 BOTO 375
359 IF He4EIF Xp [
EN 5i8
369 jiF RH 有 HKHZ1W FH
EN 9
3 HHTSBH iH-5jiP
RINT :RETURNH
3 すけ HHTSH (5-H)P
RINT :REIURN
は 上 :FR 計 間 田
19 L 世相 5 は 1
に 昌 ) ュ 195 上 ( 有 0)
io PRINT ESR jiL(H
お KEI THH
EN 18
35 =J1Z: 作 WT 日
則 F 上 お 計 幅 呈 1】
ゴゴ
415 上 =F+15 計上 ュ 5jE=
3 FOR 0W TO 3
9 IF L(0)=fiE=5
55 HEAT DFOR に 9
TO 99:MET FEPR
INT :RETURN
19 PRINT "Mo Baii
PS
1 FRINT "ScoreiT
1535 1 し (5 すし =
1
9
1 上 上 = 月 HE09
MEXT FiPRINT :R
ETURN
ん A だ ZIA7
ユメ / コ
画 変 数 リス ト
の …… 調 子 の いい 人 台
日 …… 調 子
A…… 玉 の 位置
JL( )O 〇 …… ス ロッ ト 用
LIM 上 IN…… ス ロッ ツ ト 数 字
田 プロ グラ ハム の 説明
選 O
10-- 20 タイ トル ・ 初 期 設定 、
ハイ スコ ア 表 示
30<50 台 の 選択 、 調 子 の 決
し ーー」
圧 LTIT
90~180 玉 の 打ち だ し サ す
185-265 玉 の 落下 HHTT
300 持ち 玉 、TIME 表 示 すす
500~700 玉 の 行先 決定 ゴイ て
800975 玉 の アウ ト ・ セ ー フ = 上
に TTT
決定 PTTT
FP1 フィ マー バー スズ スロット oi
P4 オ 持ち 玉 ゼ ロ
P5 スコ ア 表 示
PO 時 間 ガ せ ぎ
弄 チ ェ ッ クボ イン ト
PB-100 の 小さ い 液 晶 を 、 ス
一 放さ せる こと よう て 、
バチ スゲ ー ム を 作 づ て ぐれ だ 。
し か し レ メ モ リー が あと わざ か
し ガ 残 つて いな い の で 、 何 ガ 付
け 加 える の は 苦し いね 。
穴 に 入 つ て 増え る 玉 数 を 多く
し レ し だい 人 は 、P0-800 行 の =†
十 5 の ら の 値 を 増やし まし よう 。
スロ ッ ツ ト で 、/ ノ が な が な か が 出
せな い 人 入 は 、P1-45 行 に ビビ = ヒビ
填 ご : 閉 上 = 6:E= ニ 〇 、50 行 の ヒ =
ら を ヒーO こ らい に し て みれ ば
ご うつ が な 。 文 バ ッ チ リ 賞 。
じ マ 2/2/ 記 ニニ 人
ざ の
|6 旧 で 左右 移動 。 141 で 地面 に 伏せ 、
サー チラ イト か ら の が れる こと が で き
る (た だ し 3 回 まで )。 また 立ち あがる
と き は [5 キー。 壁 が *1? の と き は どう
や っ て も 越え を られ な いけ れ ど の と
き [0| キ ー で ジャ ンプ "/ 脱走 成功 で 100
*。 拓 び 方
キミ ( 更 ) は 脱走 者 。 サ ー チ ライ ト ( 罰 )
に 見 つけ られ な いよ う 壁 (まだ は i)
の 外 に 逃げ だ を う 。
ビス トル を 撃っ て くる の で 、25 カ ウン
ム サ ー チ ライ ト が こっ ち を 探っ て る 、 や ば いし 雰囲気 。
A^ ん つ ! な ん だ ガイ ヤ お 予感 。 用 貝 し て 伏 は ちゃ お うつ と 。
ム や つと 壁 を 乗り 越え た と 思 つ だ ら 一 斎 射撃 。 無事 、 輝 げき れる か !?.
ワ ///
点 の ボー ナス だ 。 で も まだ 外 の 警官 が
ト の あい だ 逃げ まわ ろう 。 逃げ きれ た
ら ボ ー ナ ス 100 点 で 1 面 終了 だ 。
も し サー チラ イト に つが まっ た ら 恐
怖 の ラッ シャ ン ・ ル ー レ ッ ト (6 発 の
うち 1 発 だ け 実 議 の 入っ て いる ピス ト
ル を 交互 に 自分 に 向け て 撃ち あう )。 こ
れ を 拒否 し よう も の な ら 、 い き な り 地
雷 原 に 投げ こま れ て し まう の が だ 。
地雷 は DEG 表 示 の と き CSR1 一 3
-、RAD な ら 4 一 7、GRA で は 8 一
ー11 に ある 。 [6I で 1 歩 前 進 、 で ジャ
ンプ "し て 乗り 越え て 刑務 所 に も どっ て
RS り 直 じ 。
NL
9+ へ 94
Q で 装 直 。HWe 人 能 計 『
ー 装 コー メロ ワー の 」 革 汁 筒 S 層 瑞 ご さき て
4 9 汰 球 の で いつ 。 ど ke
キー の で ③ 較 陸 。 叶 四半 画 S
貴 @ 〇 いら エピ ド 溢 本 洒 人 寺 箇 注 融 本 吉
7 1
ンー
ど
に
3
で 。 叶 9
と ぎ (
7
1
2
5
1
と
人
換
し
て
し
ま
つ
た
の )
1
2
で -
G
一 変数 リス ト
|…… ル ー レ ッ ト の 弾 の 位置 、 地
雷 の 位置 、 判 断 用
お …… 弾 の 種類
AS$…… 脱 走者 (自分 )
C…… サ ー チ ライ ト の 位置
D…… 自 分 の 位置
O 〇 …… 羽 せる 回 数
ss スコ 宛
X…… ハ イス コア
Y$…… ハ イス コア 保持 者
F…… 壁 の 決定
固い
1 計 ま 1 用 N 相
5 時 "75
ー ロ りー 朝 s 日 ニ 1。 電電
| ppTNT "RUN awa
yanUSUB 的
z9 PRIHT "Hgh"iij
inBUSUB 的
39 FRINT "by "iT
jihHSUB 約
彰 し = け [NT ER 有 HH*5
』-3 1F LE295=1
98 15L=9
59「F=INT (KNH4):
fF 上 =1iHW-*
IF F=3j BT・
89 PRINT CSR
下 PRINT SR DiH$5
LSR DD 邊 5LSR 1
Hi は
1 拉 IF 時 =" キ "iTF D=
LiHFM
は EF KEY 4WiHFB
Ji ロー 1
EEF KEY に Gi 時 =
『
199 IF KEY に 6 IF H
3 も D2W5D-
'。 . 技 4
1 利 KEY"-HHF 昌
す 4" キ IF DC9jD=
11
159 IF KEY=VWPIIF HB
3 リュ F D=93D=
inUTU 178
16# RUTO 境
9 PRIMT ESR 9i!
SR 111" 呈 PiG0
3UB 約
it9 PRINT "Bonus 1
"iiG0SUB 約 :H
=H198:50TO 料
1 に":・90" iD=5s =
R=75
放 上 昌 『= 午 THT
z すう =TNT 『PHIt
1 才 )
39 NEXT 1
章 FHR 5=1 『H』
3# FOR WTHT
54 PRINT [SE J(1):
WID(6,1)5
間 財 WTI
39 PRINT [SR 35L
SR DiH 持 5
99 EF KEYS "TiOSUB
iTFOR 1 FT『
iz IF が)=DiB0SUB
お お: 印 衣 妊
58 EXTI
1 RR-EEF 区 遇 名
3UB 約 :5OTOD 258
iTF RI 靖 PRINT LE
DR 1 5
99 FR TU「
159 PRINT ESR (お
1 旗 T
198 F Rz29T=5
190 IF Rz195T=5
メ 暗 IF Rz5iT=7
zi8 BOTO 18
zzd PRINT CSR Ds* “
39 IF KEYET6WEIFBD
y5 りー1
訴 上 F KEY="-HHFD
(9jD-D+1
ェ 45 RETURN
zo# PRINT "Bonus 19
PsiBOSUB 約 iH
=H1 間 : 時 1:
=
z56 IF HH は 4009:5-]
zi HUTB 科
P2
} RUSUB 約
3 1: 計 生 ?
8 PRINT "Pay Rus
51an ROulettei"
jinUSUB 約
HPRIHT "Hera js
3 PiSt01i"3iH0S
HB 約
39 PRINT "SPun ar
avOIveri "iiHUSU
8 航
相 1 前 HH 短 還 う +
は 間 PRIWT 日 3) 1 頒 P
ji:gUSUB 的
5W ENPHT "Pau ("/
"Yau*
iF 時 =*N" THFEN
#5
9 【F 計 1 THEHN 138
9 RMT 【 SR 5? "人
ji5USUB S:! に
5 PRIWT 3 ドコ 1 島 6
"5USUB 換
1 9 旨 PRINT LO 生 P ii
50SUB 約 : 時 ="En
呈 P"
19 上 1 『HEN 3
128 PRINT [SR 5
snUSUB 約 に
9+1i ロ UTU 59
159 PRINT ESR 3 "Ho
和 miiPiiUSUB 的
148 PRINT 時 Lose
USUB 約
198 【F 時 Yo 馬上 =
は = 旧 hUTO 朝
159 BUTO 絆
P3
抽選 ロ ロ ピ 三 )
1# PRIMT " Be zowa
rdPsRUSUB 的
z8 [=iNT (RE16)
+ii 間 DE #
39 IF iDHOE 5
HEF fs8iNODE 5
9 PINT [SR 115"_
59 PRIHT CSR DB45
18 IF KEY*"rG0SUB
119
9 IF 0=1iPRIHTE
SR DiH45:605UB
HE 日 昌 日
失
9 IF i=D THEN 159
1 暗 0TO 69
119 PRINT CSR Di" *
1 IF KEY="6"iD=D+
1
is9 F KEYT="-WIIF D
= す お 3 日 900=D+?
中 に 1
148 RETURH
i59 FOR = 0 335
ipb9 PRINT ESR DiH:
LSDR Ds
1 中 NEXT ii50SUB 約
inUTU #4
1
19 PERIHT "ame iv
sriiiBUSUB 約 :
『= 衝
zd PEINT " Score's
iRUSUB 5
3 iF HDSX=HHi TMP
間 遇 F| 「 っ
18 INPUT "Replay(『
ロメ 】
3 F ="YY THEN
朝
59 PRINT *′ Banod by
ai sEND
FUR E=# FH 200
NEMT E
PRINT IgEFHRN
CC
し に]
『… 9
LOT 1
UNBoe YOM OF "GOD(
ノ や SS | リプ レイ 入力 用
較 プロ グラ ハム の 説明
PO 脱獄
1 ゲー ム 中 タイ トル 表
志 防 止
D 初期 設定
10- 30 初期 画面
40- 50 ライ ト の 位置 決め
60- 70 壁 決定
60-- 80 表示
100 フイ ト に 照ら され だ
ゆ
110 て 160 キー 入力 判断
170-180 ジャ ヤン プ と ボー ナス
P41 脱走
1 初期 設定
10- 30 弾 位置 決め
40-100 表示
110 て 130 弾 に あ だ つ だ か が 判断
140 カウ ンマ ダー 減ら し
145 一 170 表示 を 消す
160-210 タイ ム に より の 弾 を 増
や す
220 自分 を 消す
230-245 キー 入力 判断
250-270 ボー ナス 表示 、 伏 せ
る 回 数 を 減ら す
P ど ラッ シャ ン ル ー レ ッ ツ ト
5 設定
10-~- 30 初期 画面
40 弾 の 位置 決め
50 て 120 メイ ン ル ー チ ン
130 一 160 終期 画面 と 飛び 完 判
定
P づ 地雷 地帯
1 20 て 40 初期 設定
10 初期 画面
50<60 表示
70,.110-140 キー 入力 判断
60 到着 判断
90-100 地雷 爆 発 判断
150 一 170 米 発 表示
P4 ゲー ム オ ー バ ー
PO ループ カ ウン マター
一 チェッ クボ ポイ ント
癌 画面 た も 、 な か な が ガ 凝 つて
いて 、 ガ なり の 遊べ る ね 。 だ だ し 、
残 り ス テッ プ 数 は O な の で 、 自
分 で 改造 する な ら ば 、 う まこ ぐ 削
ら な いと だ め だ ね 。
脱走 の と ころ は 、P1 の 1 行
や ニ “生還 O 〇 "の m を 1 つめ ぬく ぐ 。
160-200 の R に 対す る 値 を 小さ
ぐす る と 、 難 し く な る 。
支 バ ッ チ リ 賞 。
クア
日 の コー ス 。
WW
WW
0 NE 「 守 _
ン 更 "と P
ナチ 大 は ち つ B
ャ 田 2 な 私 に
1 て 人 み が は
を すし に き 左
失い 全 の 導
き は 国 、 残 す しき は 還 ( 最 初 は 還 ) を 入 中 だ な 人
_ _ tv も \ さ
力 。 い き な り レー ス が は じ ま る 。 敵 の を まん 大 ちる
車 が * YA7YAZ の 順に 近づい て 〈 る 暫 プ 1 こ ュ い
' 3 8 6 > ョ 思 レ
8 の て ]4I6I で か わし て 進 も う 。DAMA 待 ン 清 ンー いしい [|
とぶ [ リラ と
導 び 方 CE が 50 に な る か 制限 時 間 を 越え と 2 。 いり が
RUN き せる と “CLEAR(Y/N)Y と ゲー ム オ ー バ ー。 で も 旗 (P) を 取る と ド を の 9 に
o】
きい て 〈 く る の で HI-SCORE を 消す と DAMAGE が 0 に な る ぞ 。
P6 25 iF BA25IF BSSH 草 365 IF Hz5iPP-Yi0 夫 519 ZZtiiIF 51i1 柚 525iF OcPEIF MS 東 29PRITI 3 1901 1F 522000 だ ICU
2 PRINT "SHF 有 1 が T9 399 F Zz53jPRINT CS "TETtt1:D=Dt19 : 50) KU?
2 49 IF MVTVHIF BS | 366 IF 有 R15jP=PTWi6 R 5 "PsiJ 半 iPRINT CSR P-1: 1002 jiF Sc159506 に 71B
4 iNPUT *CLE 有 RY/ 9iF=25:P=3 0T0 368 512 IF な 54:J9 "(Vit50S0B 9 UE 【10U
DDY 45 iF Hz350SUB 19 | 387P=PY 515 IF RCS:PRIHT KS 8 125 時 190:60T0 29 | 1983 !F Sz109IF 了 1
5 IF 6=PYWYVWRE : 9 308 IF Pz9P=1 ュ ョ ッ テ ョ ェ ト CD と ・ 5s27 IF 0459 THEN 95 | 319 7=INT CR 間 科 42): ji0$="(RDKYUU"
0 R 7 入 7CSR6i | 3 人
時 =*PB-396"iF=2 | 59 IF R14560S0B 2 | 389 IF Ps7iP6 wrtFSR 9:TD[ RETURN 1093 IF Se795IF 軸 3
00 31 F=Ftt:IF F=295F 中 | 556 60TO 29 0 が DF Me
本 所 "日. ば 左 店 ご .) 3z jiF「>255BOSU8 3 82 時 =TTTIPH | 517 T=T+1ETF Ts 用 PP | 98 PRINT iPRIHT "6 NT "MRHLL 0D=D | 1006 IF 5c495IF 誕 55
本 全日) 三 日 ご . 6 _- ビ | IHT ESR iT 0 Of IPoint NO。: sir5i0= 和 了 P) ご 生 有 」、
10 9=Yn00 タ 90 35 中 1 暗 THENT | 315 RETURH R TURN 1816 PRIHT "You Hre
9n7222000n = 村 459 5$=KEY =2B 1 ax 195 T=T-HED=0+T:S=S 959 PRINT :PRINT * 095" Driver!
59 GOT0 458 469 IF 66=*4"50- け -1 PPE DRcNtIEIF 929 5 穫 E OVER KYOWT
11 PRINT "Hign br | :98 OSUB 919:0--Y :IF 0<650- sUB 928 13= の "Point NO | 1912 IF FIF CDSL
iver.053) HIS | 118 時 HHHEIF 時 45 時 | 479 IF 6=650=041 | so1 jiF jckfF assN | 「19 PRINT "Over ti "RED =StF=WWPRINT "Y
5 3 499 V を - 電 ID(H,6) =WsPRINT PSR at mase。 | 9 PRINT "Crashi D gur 9et Hi9h'Si
12 0-4iMN=TTVEP=s | 12B KEIURN 499 PRINT :PRINT CS eeeetiH 和 1:50 57 MISS.55 DD T=tTEER ENPUT "Hame'U
Ri 時 116:K=7:N | 289 50S 昌 916:0-9Y R 7T sUB 989 115 IF RA6 THEN 1 ETURN 9
=1: 時 9 219 了 時 FtEIF 時 145H 599 PRINT CSR 5 中 " | so TF nzTzPRINT S M 399 「=5:D=9sPRINT i14 PRIHT" 『HEE
29 B=INT (RRHe16) =9 iCSR 15VS5CSR 0 p 5*tDDY)YrE0 | 118 IF R=S5PRINT P "Checer Fla9e'i IE
:IF He9 THEN 49 | 9 RETURM OCSR Pi sUB 928 RINT "Rine cose 「RETURWN
39 iF Be 時 1 309 M$=WD(F,1):605 SR 8952 eri=1iK=6 1090 IF 5>200309=*Ba
UB 919 人
田 変 数 リス ト ・ AA…… コ ー ス の 変更 用 ・ 200 一 220 を カー ブ 時 の 処理 - と GAME OVER
|K…… 人 道 は ば 用 * 委 YSe 融 数 ・ 300-315 他 車 が 出現 し た と き : 玉 チ エッ フク ボイン ト
M…… 取 つた だ チエ ツ ッ カ ー フ ラッ ツ ・F…… 他 車 の 変更 用 ・ の 娘 理 ・ 残り が あと 74 ス テッ プ あ る の
グ の 数 ・G$……KEY 入 力 用 ・ 250 と 4/0 キー 入力 ・ で 、 ト ン ネ ル の ある コー ス な ん
フ .… 走 行 距離 ・V$…… コ ー ス の 表示 用 ・ 460-500 画面 表示 ・ ガ を 加え て も いい が ガ な 。
SMI ら 9 ・NJ…… チ エッ カー フラ ッ グ の : 510~530,920.970 て 980 チエ ツ ・ リプ レイ が で き な い の で 、950
Tee ギル 有無 - カー フラ ッ グ 、Rain ・ 行 と 1014 行 の END の みわ り に
Os の 三 9 ・O……- 最 低 ミ ス 数 5 コー ス 設 定 、 衝 突 処 ・ GOTO2 を 入れ よう 。 他 の 車 を
R…… 面 数 ・ 較 プロ プラム の 説明 ・ 理 ・ か わす と 制限 時 間 が 1 増え る が 、
$…… コ ー ス 、 敵 の 車 キ ャ ラフ : 2-- 12 初期 設定 、 初 期 画面 : /00 一 725 面 ク リア 時 の 処理 : 310 行 の =H+ 1 の 1 の 値 を 大
〇 …… 自 車 の 位置 日 [表示 等 ・ 910 乱数 発生 ・ きぐ すれ ば 、 制 限 時 間 を 多 ぐ 増
WS$⑤…… 他 車 表示 用 ・ 20 60 コー ス 設 定 、 他 車 の : 950 GAME OVER _ : や せる 。 衝 突 し だ 時 の D の 増分
P…… 他 車 の 位置 ・ 設定 ・ 1000 一 1014 ら 面 フリ アレ だ 時 ・ (525 行 と 920 行 ) を 変え る の も い
H…… 制 限 ツ イム ・ 100<120 右 カ ー ブ 時 の 処理 : の メッ ツ セ ー ジ 判断 ・ いね 。 廊 バ ッ チ リ 賞 。
^ 自 分 で 作る MSX ゲ ー ム 『 ゲ ー ム ラン ド 』 ぐ の 発
売 元 ・ 問 合 先 : カシオ 計 算 機 株 (広報 室 消費 者
課 谷 03-347-4830) の MSX (8K) ROM カー
トリ ッ ジ \7, 800
カシ オ か ら
\29.BDUMSX
「 過 V- 万 新 発 売 /
えっ 、MSX が この 値段 で ? と 段
い だ の が 、10 月 15 日 新 発 売 の カシ オォ の
MSX「PV- 7 」 だ 。 お 金 を た め て ポ
ケ コ ン で も 買お うか な と 考え て いた 少
年 少女 は 大 注目 だ ね 。 本 体 の PV- 7 が 、
な ん と 29,800 円 ! これ に 増設 RAM や
カセ ッ ト イ ンタ フェ ー ス を 付け て も 40
000 円 で おつり が くる の だ か ら 、 こ れ
は スゴ イ 。
この PV- 7 を 買っ て 、 ま ず は MSX
用 の ゲー ムカ ー ト リッ ジ で 遊び まく る
こと て し ょ う 。 で 、 ひと と な り ゲ ー ム
て 遊ん だ 後 、 今 度 は お を そる お そる 本 に
載っ て いる プ ブログ ラム を 打ち 込む ん だ
よね 。 こ の 「 ポ シェ ッ ト 」 の こと も 忘
れ な いよ うに 1 そし て 、 い くつ か の
4A カ シオ の MSX 「PV- 7」 は RAM 8K な が ら 、 値 段 は \29, 800 と 驚異 的 な 安さ 。 よく 見 る と 他 の
MSX と 何 か が 違う 。 カ ー ソ ル ・ キ ー の 部 分 が 、 8 方向 の ジョ イ パ ッ ド に な っ て いる の だ (ちゃ ん と し
た カー ソル ・ キ ー も 別に 付い て いる )。 し か も 、
トド り カ ーッ キー が 2 個 、 キーボー ド の 左下 に 取り 付け
られ て いる の で 、 ジ ョ イ ・ ス ティ ッ ク が 標準 装備 され て いる よう な も の 。 写真 は 「PV- 7 」 本 体 を 、
拡張 ボッ クス (別売 \ 14, 800 円 ) に 取り 付け た と ころ 。 こ れ で 16K の 3 スロ ッ ト 付 マシ ン に 変身 する 。
さら に 増設 RAM を 加え れ ば 64K ま で 拡張 可能 だ 。
エラ ー の 後 、 プ ログ ラム を 打ち 込み 終
ぇ えて RUN! や っ た だ た! と 、 こ れ を 何 度
か くり 回 す と 今度 は こう 思う ん だ よわ ね 。
「 自 分 で も ゲー ム を 作っ て みた いな あ
で も 、 い くら 6 ブロ グラ ム を 打ち 込ん
だ と いっ て も 、 人 の 作っ た も の を 何 も
考え ず に 入れ て いた だ だ け の 人 は ね ……。
キャ ラク タ や グラ フィ ッ ク パ ター ン を
作っ た り 、 そ れ を 自分 の 思っ た 通り 動
か す と いう の は な か な か めん どう な ん
だ よね 。 ジン 人 福 、 ど うみ し よう が
と ん /
同時 に 登場 し た
秘密 兵 響
「 ゲ ザー ム ラン ド 」
を こ で 登場 し た の が PV- 7 と 同時 に
出 た カシ オ の ROM カー トリ ッ ジ 「! ゲ ー
ムラ ンド 」 だ 。 も ちろ ん PV-7 以外 の
MSX で も 使え る MSX 規 格 の ROM カ
ー ト リッ ジ な の が だ 。
き て 、 こ の 「 ゲ ー ム ラン ド 」、 キ ミ の
ォ オリジナ ル ゲ ー ム を バン バン 作り 出す
魔法 の カー トリ ッ ジ な ん だ けど 、 と ん
を ゲー ム が 作れ る か と いう と 、 パ ッ ク
マン に 代表 され る 迷路 型 ゲ ー ム 。 そし
て イン ベー ダー に 代表 る れる シュ ー テ
オル ググ 天 ゲ ー ム も 人 も る 。 まだ スイー
スラ ロー ム の よう な スク ロー ル 物 も で
きち ゃ う ぞ 。
や ざし い
メニ ュー が キミ
を 導い て いく
それ で は きっ そ 〈《 「 ゲ ー ム ラン ド 」
の カー トリ ッ ジ を スロ ッ ト に 差し 込み 、
Power ON! まず は スク ロー ル 画 面
の 中 を ジェ ッ ト 機 が 飛ぶ か っ こい い デ
モ 。 ス ペー スキ ー を 押す と “ゲー ムラ
ンド で な に を し ます が と メニ ュー が
出 て くる 。
>1 ゲー ム で あ を ぶ 。
2 テー こ の を つく る
3 ゲー ム を な お す
ん が ダ が 一 ム を よさ みこ び
5 ゲ ダーム を ほぞ ん する
>” を カー ソル キー で 上 下 し て 目的
の と ころ で リタ ー ン キー を 押す 。 もち
ろ ん 最 初 は ゲー ム が 入っ て な いか * ら 、
2 の ゲー ム を つく る” を 選ぶ の だ 。
する と 今度 は パ ゲ ー ム の し ゅ る い は ど
准 に し ます か が も きい て くる 。
>1 せん と うし き ゲ ー ム
2 めい ろ ゲ ー ム
と 、 表 示 き れ た 。 こ れ も カ ー ソ ルキ
ー と リタ ー ン キー で 選べ ば いい の だ 。
クタ
ヤマ 璧 を セッ ト し て か ら 、 ポ イン ト を お いて いく 。
カー ソル ・ キ ー と スペ ー ス ・ キ ー だ け で あっ と
いう ま に 背 景 の で き あ が り 。
この よう に 、 こ の 「 ゲ ー ム ラン ド 」 で
は メニ ュー を 次 々 と 選択 し て 1 つの ゲ
ー ム を 作り 上 げ ら れる の で 、 初 心 者 の
人 で も ちょ っ と いじ れ ば 理解 で きる だ
ろう 。
育 景 も カン タン
に で き あ が っ て
し まっ た
き て 、 2 の びび め いろ ゲー ム ” を 選ぶ
と うな か に か し ます か と きい て きた だ た 。
背景 、 キ ャ ラク タダ タ 、 音 、 ス トー リー の
どれ か を つく る の だ 。 ま ず は 、 背 景 。
迷路 ゲー ム で 大 切な の は な ん と いっ
て も 迷路 ! (あたり まえ )、 壁 の 配置 を
シー くい
壁 は すでに 白い タイ ル が セッ ト さ きれ
て いる 。 床 に は 8 ドッ ト ご と に 目 EU が
ある の で 、 こ れ を だ より に 壁 の キャ ラ
クタ を 配置 し よう 。 左 上 に ある 四角 の
マス を カー ソル キー ザイ 移動 きせ て 、 セ
下る あこ ろ 人 も っ てき に ら ス ペー
スキ ー を 押し つつ カー ソル キー を 押せ
ば 壁 が ずら ずら と セッ ト さ る れる の が だ 。
これ は きわ め て 簡単 。
間違え て 壁 を セッ ト し て し まっ た だ と
き は リタ ー ン キー を 押し て 、 メ ニュ ー
に も どっ て 、 通 路 を 選ん で 豆 の キャ ラ
クタ を 通路 の キャ ラク タ で 消し て し ま
を ば いい わけ だ 。
た だ し 、 メ 迷路 を 作る とき 気 を つけ な
けれ ば な ら な い の は 、 こ の 後 で 作る 登
場 キ ャ ラク タ が 小さ く て も 16X16 ド ッ
ト で で き て いる の で 、 8 ドット の 通 政
キャ ラク タ は 2 個 分 間 わ あけ な いと ゲ
ー ム に な ら な く な っ て し まう の だ 。 こ
この と ころ 、 上 区 点 と いえ ば 難点 だ けど
93 。 で も 自分 で ゲー ム が 作れ る 楽し
き を 比べ 作 は と うっ て こと な い 衝 。
さて 各 の 配置 が 終わ っ た ら 次 は ポイ
ント (得点 ) を 配置 し よう 。 こ の ポイ
ント の キャ ラク タバ パタ ー ン も すでに 決
まっ て いて 、10 点 、20 点 、30 点 と ある 。
ポイ ント も 盛 と 同じ よう に モッ ト す れ
は いい の だ
キャ ラク タタ 作 り
は 編 を か くみ た
い に 楽 し い ぞ /
ヤメ イン ・ キ ャ ラ は パコ ちゃ ん に し て み ま し た 。
右向き 、 左 向き 、 後 向き も 作っ て みた 。 枠 の 右
側 に な らん で いる の が その 実物 大 キャ ラ だ 。
ドド エズ スス エエ スズ スミ 2 肖 衝 ん.
に よ 。 レス メ 。
多年 和 乱
参入 人 信和 区
さて 、 背 景 で ある 迷路 が 完成 し た ら
次 は 登場 キャ ラク タ を 作ろ う 。 ファン
クシ ョ ン の 1 番 を 押し て 背景 メニ ュー
か ら 1 つ 前 の メニ ュー に も どっ て “ キ
ャ ラク タ を つく る” を 選ぶ 。 自 分 か 他
の も の か 、 向 き に よっ て 形 を か える か
キャ ラク タ の 大 きる は 、 等 の メニ ュー
を 選ぶ と 、 や っ と こき キャ ラク タ を つ
る と いう メニ ュー が 員 た 。
実は この 「 ゲ ー ム ラン ド 」 の 中 で い
ちば ん 気に入っ て し まっ た の が この 部
分 で 。 ス フラ イト を 使う た キャ ラク ダー
お 選 計 きる
が ビ
コー ト
お わり
が いと も だ や まく 下 き て し まう の
や っ ぱり オリ ジ ナ ルキ ャ ラク タ を 作
り だ い の で ドッ ト 単 位 で 作る こと に す
る 。 す る と 16※X16 の キャ ラ 分 の 大 き な
ワク が 出 て くる 。 こ れ が キャ ン バ ス が だ 。
背景 の と ころ と 同じ よう に カー ソル
キー と スペ ー ス キー を 使っ て モッ ト し
て い (〈《 だ け 『! 今 モ セッ ト し て いる キャ
ラク タタ が 右側 に 原寸 で 表示 され る の で 、
や っ て いる と 楽し く な っ て し まっ た 。.
さて 、 色 も 自由 に つけ られ る の だ よ 。
キー ボー ド の 2ー- 3 段 目 の 左 側 の キー
が 16 色 に 対応 し て いて その キー を 押す
と ボー ダー カラ ー が 対応 し た 色 に 変わ
る の で 一 目 で わか る 。 間 違っ た と き は
穫 明 を 選ん で 1 つ 1 つ 消し て いけ ば い
いん だ か ら 、 安 心 。
サン ブル か ら も
選べ る ぞ /
この メニ ュー て 便利 な の が ヾ は ん て
ん (反転 )" と パコ ピー。/
だ と えば 、 右 向き の キャ ラク タ を 作
っ だ ら コ ピー し て 左右 を 反転 すれ ば 、
左向き キャ ラク タ の で き あ が り 。 つ ま
り 、 同 じ キ ャ ラク タ を 左右 作ら な く て
も いい わけ が 。
また 自分 で キャ ラク タ を 作る の が め
と うだ 大 区 は ボン クル も いう の
も ある 。 人 や 動物 、 エ イリ アン や フル
ー ツ 、 そ し て 乗り 物 等 25 種 類 の キャ ラ
クタ が 自由 に 選べ る の だ 。 こ れ に ちょ
っ と 手 を 加え れ ば オリ ジ ナ ルキ ャ ラク
タ を 作る の も 簡単 。
エン
す に はじ ピロ = テン
に に ピロ テロ
に は は 抱 所 モロ FF
ー も ーー まし まで 柱 つ あ
て
た っ
委
多
李
し コ
金
錠
に 2
吾
に 3
と
に
委
間
に 2
人
急
に 2
に 2
2
に 2
に 2
2
k 2
作曲 も カン タン に で きち ゃ う (4 小節 以内 と
いう 制限 は ある けど )。 オリ ジ ナ ル も いい し 、 好
き な 曲 の メロ ディ で も いい ね 。
斉 を 入れ て 、
スト ー リ ー を
決め よう
背景 が で どき て キャ ラク タ が で きた ら
次 は サウ ンド を つく ろう 。 こ れ も メ ロ
ディ か 効果 音 か 、 等 し いく つか 選択 す
れ ば いい 。 音 も 自分 で 作り た いな 、 と
いう 人 に は ちゃ ん と 楽譜 が 用 意 さ れ て
いて 、 音 の 高き を カー ソル ・ キ ー で 上
下 し て メロ ディ を 作れ る の だ 。
楽譜 な ん か わか ら な いや 、 な ん て 人
に は これ また サン フル" が ある の だ 。
次 に 効果 音 だ けど 、 こ れ は すでに 5
種類 決ま っ て いて 、 動 き の 音 、 メ カニ
ッ ク 、 爆 発 、SF 、 警報 とし 、 い か に も を
れ ら し いも の が ちゃ ん と 用 意 さ る れ て い
る の で 、 必 要 に あわ せ て 選べ ば いい わ
けが
さて 最後 に スト ー リ ー を 決め よう 。
これ が いち ば ん 大 切 で 楽し い 。
今 まで 作っ た 背景 や キャ ラク タ 、 サ
ウン ド を いか に 組み 合わ せる か 、 と い
2 た
自分 や 敵 の 動き 方 ( 英 は 攻撃 し て
る の か 、 ぶ つか っ て くる の か ) 、 ス ピー
ド 、 出 て 来る 回 数 等 も ここ で 決め る の
0。 こと こと の と この て 、 そ の ゲー ム が お
も 5 し ろく も つま ら な くも な る の で 、 よ
〈 考 えて 。
の C74 だ アア
あっ と いう ま に
オリ ジ ナ ル ・
ゲー ム い っ ちょ う
あがり /
央 6 CC て き の が り 、 た な っ だ
ら さ っ そ 〈 プ レイ し て みよ う 。 自分 の
作っ た キャ ラク タ が 自分 の 作っ た 迷路
の 上 を 、 自 分 の 作っ た サウ ンド に の っ
て 動き 回 る の を 見 て いる の は いい 気持
も ち だ ね 。
編集 部 で は 、 パ パコ の キャ ラク タ を 使
っ た 迷路 式 ゲ ー ム を 試作 し て みた けれ
ど 、 う ん な か な か の バッ チリ 賞 も ん で
す 。 こ れ て で 制作 時 間 は た っ た の 1 時間
だ よ 。 そ れ に 気にいら な けれ ば ぼ ば 、 ま た
手直し すれ ば いい の だ か ら じ っ くり と
オォ オリジ ナル ゲー ム が 作れ る わけ だ よ 。
も ちろ ん 今 完成 し た ゲー ム を 、 カ セッ
ト テ ー プ に 記録 する こと も OK! こ
れ で BASIC の リス ト で も 出 て くれ ば い
うこ と な し な ん だ けど な あー。
えっ ? アド ベン チャ ー や シミ ュ レ
ーション も や り だ いっ て ? . ちょ っ と
それ は 無理 な ん だ よね 。
と に か も くに も 、 こ れ か ら MSX で
ゲー ム を 作ろ うと 思っ て いる ビギナー
の キミ に と っ て は ホン ト に 魔法 の 箱 な
の だ 。
い s 記
ALLDMS
8 ge WasclotF
9 】
発売 元 三 徳間 書店 < く テ クノ ポリ ス > 販売 元 三徳 問 コ ミュ ニケ ーション ズ な お 、 お 問い 合わ せ は 毎日 、PM3.00 て 5.00< テ クノ ポリ ス > 容 03(295)4610 ま で 。
キミ の 作品
お 便り 共 集
ミミ の 作 つ だ
リ ジ ナ ルプ
ケ グー ム に 限ら びす 、 ユー チ ィ リリ ディ ー
2 イタ スラ ブロ ダグ ラバ な ど 、 オリ ジ ナ
ル で 楽し い プ ログ ラム な ら な ん で も 結
構 で す 。 部 門 は 次 の 3 つが あり ます 。
@ 1 画面 プロ グラ ハーー そ の 機種 の 1
画面 の 表示 限界 に 入り きる プロ グラ ム
の ご と で す ( だ と えば O-8801 だ と 80
文字 X25 行 まで ) 。
@ シ ョ ー ト プロ グラ ハム 部 門 一 一 原則 と
し て 100 行 以内 の プロ グラ ム 。 プ ログ ラ
ム へ に よ つ て は 、 若 干 の 行 数 オー バー も
許容 し ます 。 な お 、 マ シン 語 の 場合 は
ン 、 賞 金 が 出る の と
ルン ル ペ
人 @ 1 画面 プロ グラ ム 、 シ ョ ー ト プ ブログ
ラム は 、① ヨ ッ シ ャ 賞 ……5 千 円 ②
バッ チリ 賞 … 1 万 円 ③ サ イコ ー 賞
5 万 円 (た だ し 、 本 格 プ ログ ラム 部 門
で 没 に な っ て も ショ ー ト 部 門 で 採用 さ
れる こと が あり ます )。
うに K バ パイ ト を めど と し ます 。
@ 本 格 ブ ログ ラム 部 門 一 一 単に プロ グ
ラム が 長い だ け で は な ぐ 、 編 集 部 を 、
「 お ずつ ! 」 と いわ せる よう な 力 の ある
も の を 求め ます 。 長 さ に 制限 は な い の
だ か ら 、 リ スト も REM 文 な ご を 入れ
る な ご ど ご 、 わ か りや すい も の が 望ま し い 。
オリ ジ ナ ル に 限る ./
あ だ た だり まえ の 話 で す が ガ 、 キ キミ が キミ
自身 で 考え て 作 つ だ プロ グラ ハハ を お 叉
いし ます 。
ー 還 投稿 厳 祭 ノ
同じ プロ グラ ハハ を 他 読 に も 投稿 する
よう な こと は 絶対 やめ め て ぐだ さい 。 次
作 に 次 ぐ 大 問題 に な つて し まい ます 。
バック アッ プ を 必ず
投稿 作品 は お 返し で きま せん 。 ま だ 、
採用 作品 に つい て 電話 で お 聞き する ご
と が あり ます の で 、 め ゆず プロ グラ ム の
コピ ー (デー ノブ や リス に な ご ) を と う
を あい で くだ さいし
_- ポシェ ッ ト Vol.3 よ り バ ブ 通 信
すでに テク ノ ポ リス 9 月 号 で バグ 通信 を や やり ま し だ た が 、 ボ シェ ッ ト only の 読
者 の た め に 再び バグ 通信 で す 。
倫 P16「 マ ン ゴ ロー ゲー ム 』。 こ れ は バグ じゃ
な いけ れ ど 、 間 違え や すい の で 特別 注意 。530
行 DATA の 5 番目 の キャ ラク タ は コロ ン で は あ
り ま せん 。 し か も 、Key に この キャ ラク タ は
て こ で て あらかじめ 、F 1 キー に この
キャ ラク タ を セッ ト し て お く 。 セ ント 方 法 は 、
a$=chr$(&h7c) :Key1 a$ で RETURN。
これ で 、F 1 キー で この キャ ラク タ が 打ち
な い !
込め る の だ 。
僅 P45'Space Reverse」。 印 刷 の 都合 で コ
スス デー
トメ ント の 間 に は コロ ン を 入れ て くだ き
ロン が みん 人 な 消え て し まっ た !
い 。 どー し て も わか ら な い 人 は 、 電 話 で
お ね えさ ん が 教え ます 。
参 P56『Fire Ball。 X は 、 チ ェ ッ カー に
(GRAPH キ ー+ オ 0)。 “る 6" は X に 。 人"
は ^ 金 に 。 それぞれ 読み か えて くだ さい し 。
欠 P65'Space Wave』。 1 行 ……
0 TO32STEP3…… STEP3 は STEFP 一 3 の
誤り 。4 行 PSET (XY) に ,6 を 追加 。 10 行 …
… パ GOME OVER" は ば GAME OVER "。
倫 P80『Car Race』。 1 の 写真 が バグ っ て ま
し た 。 LOAD ミ ス な の で し ょ うか 、 こ ん な か 男
面 に な る は ず が な い の だ っ た 。
プロ グラ
採用 され た プロ グラ ム の gd 光 が
こ ご の ルー ル を 守っ て いま す 。
テー ブ で 投稿
2 0 の 0 の トド デ ョ グ
36242
の ) に 、 セ ー プ し て 送っ て くだ さい 。
① 必 ず 、 ベリ ファ イ す る こと 。
② 用 心 の た め に 2 回 以上 同じ も の を セ
に
NE イル ネー ム 、 機 種 名 等 を テー プ
に 正確 に 書く こと 。
④ 1 本 の テー プ に は 原則 と し て 1 本 の
ロク ラバ を / (ソノ ログラム が 2
上 入っ て いる と 見 すご すこ と が あり ま
あ )
必要 事項 を 書い た
手紙 を .2
テー プ と いっ し ょ に 、 次 の 事柄 を 正
確 に 記し た 手紙 を 同封 し て くだ さい 。
も し 、 手紙 が 不備 な 場合 、 プ ログ ラム
よく て あお ポン に か る こと が あり ます
① プ ログ ラム を 作っ た 機種 名 ・ 言 語 名
(機種 に よっ て は BASIC 名 や ペー ジ
数 や 増設 オプ ショ ン な ども 正確 に )。
② ロ ー ド 方 式 を 明記 ( ファ イル ネー ム 、
ポー な ど は も ちろ ん 、 ロ ー ド する た め
の 0 当 マ ンド 、 や セーブ プ し た と き の レ コヨーテ
ダー 機種 名 な ども )
③ プ ログ ラム の 遊び 方 、 使 い 方 (使用
キー の 説明 や ゲー ム の ルー ル な ど を な
る べく 詳し くわ か りや すく 。 ゲームス
トー リー な ども あれ ば 書き そえ て 〈 だ
さい 。 な お アド ベン チャ ー ゲ ー ム は 谷
玩 あ Mo し ま 代 /
④ 変 数 リス ト (プロ グラ ム て 使用 の 変
数 名 と その 意味 を 明記 し て くだ さい )。
⑤ プ ログ ラム 解説 (デバ ッ グ や 解析 が
し まゆ いよ うに 、 マロ グラ A 人 0 どの 条
で と うい うこ と を や つっ て る が の 、 人 な どら 詳
〈 書い て くだ さい )
⑥ 参 考 文献 ・ 参 考 プ ログ ラム を 明記 ( プ
回 グラ ム を 作る と き に 参考 に し た 本
雑誌 の 年 お よび 月 号 ・ ペ ー ジ 数 、 記 事
名 ・ プ ログ ラム 名 を 正確 に )。
(⑦ 郵 便 番号 ・ 住 所 ・ 氏 名 (ペン ネー ム
パ あ れ ば それ も )・ 年 令 ・ 職 業 (学校
学年 ) 重 話 番号 も 忘れ ず に に 。
封 黄 で 仕上 げ ./
封筒 の 裏 に も 、 住 所 ・ 氏 名 の ほか 、
機種 名 ・ ロ ー ド 方 式 を 明記 し て くだ さ
い
封筒 の 表 に は 、 プ ログ ラム の 部 門 名
( 1 画面 プロ グラ バム 部門 ・ シ ョ ー ト プ
ログ ラム 部 門 ・ 本 格 プ ログ ラム 部 門 の
3 つが あり ます ) を 赤 て 明記 し て くだ
さい 。
あて 先 に 多少 変更 あり
これ か ら は ポシェ ッ ト 編 集 部 あて で
も 一 括 し て 受け つけ ます 。
〒101 東京 都 千 代田 区 神田 錦 BT3-22
小笠 原 ビ ル 4 F (結局 住所 は 変わ ら ず )
の 2 スッ ャ アクラ ム ポシェ ョ ウツ
編集 部 内 各部 門 係
あど とい ′ な ん で も の せる ぞ /
ポシェ ッ ト で は 。、 プ ログ ラム 以外 に
も 5 、 キ ミ の お 便り や 意見 、 イ ラス ト な
0 0 計 R2032NR KU ま WS
だ 。 隣り の 『 テ クボ ポリ ・ ク ラブ 』 で あ
00 の
っ ち に 集まる か どう か ヵ か 不安 な ん だ けど
"(正直 だ な あ ) で も 、 ち ゃ あん と
スペ ー ス あけ て 待っ て る か ら 、 ど し ど
し 送ら て お くれ 。
まず 、 こ ん な ユー ナー を 設け ます 。
@⑱ プ レイ バッ ク ・ チ ェ ッ クボ ポ イント
ポ ボ ポシェット に の っ た プロ グラ ム の チ
広告 。
紙 に 丸ごと あげ ます 。
ッ ク ポ イン ト 以 外 に 、 キ ミ 自 身 や 友
だ ち が 気 づい た 改造 ・ 改 良 の ポイ ント
を 教え て くだ さい 。 次 号 で 紹介 し ます 。
な る べく 、 具 体 的 な ゲロ グラ ム ( 〇 〇
行 に これ を 加え る と こん な に お も し ろ
く な る 、 と か 、 こ の 命令 は いら な い 、
と か ) 付き で 鋭い チェ ッ ク を 待っ て ま
事 ら
@ 丸 こ
だ た と えば 、67 ペ ー ジ の ポシェ ッ ト の
こん な スペ ー ス を 、 キ ミ の お 手
言い だ た いこ と が
- と コラ ム ・ レ ター
品 を や さしあげ ます 。
ん で す 。
いっ ぱい ある 人 、 と て も ハガキ に は 書
きき れ な い お も し ろ い こと を 経験 し た
人 、 ゼ ぜひ 投稿 し て くだ きい 。 イ ラス ト
の 好き な 人 は それ も 一 緒 に 。
を その ほか 、 ポ シェ ッ ト に 対す る 文句 、
記事 や 掲載 ゲロ グラ ム に 対す る 感想 ・
意見 、 を の ほか な ん で も 和 柔軟 に 対応 し
て いき ます 。 ヨロ シク /
あて 先 は 、 プ ログ ラム の あて 先 と 同
じ 《、 ポ シェ ッ ト 編 集 部 まで 。 採 用 分
に は 、 取 りあ げ 方 に 応じ た 謝礼 や 記念
担当 は ヤス コ ち ゃ
あー、 こ の 「 ポ シェ ッ ト Vol. 4 」 の お か げ
SC カツ Z を CU で し まい まし た 。 は クラ クジ 、
鼻 は ズル ズル 、 目 は ショ ボ シ ョ ボ 、 お な か は
グー グー( ? ) ち な み に 「 ポ シェ ッ ト Vol. 3」
で 、 ク ー の ペン ネー ム の 由来 は 何だ ? と い
う の を 募集 し まし た が 、 み ん な 「 お な か が す
いた と き の 音 だ 」 と 思っ て いる よう で すね 。
補い ます 当 。 実は ね … ヽ 、、 おっと,、 ニニ ん な が こ
と 書い た ら 夜 道 で YAMAHA の RZ-250R に
ひか れ で し まう 9 か な / や w め た 。
と ころ で 、 今 回 いろ いろ な プロ グラ ム を 見
て て 気 に な っ た ん だ けど 、 英 語 の 間違い が 多
い ぞ 。「ANY KEY」 が 「INY KEY」 に 、「S
TAGE」 が 「SEARGE」 に な っ て る ん だ も ん 。
その 他 に も か な りあ っ た ヨ 。ERROR に な ら
た KS が らら つて で て 、 見 ざし て (は いけ ませ ん だ が 。
類 を つけ て くだ さい まし 。 (2/ ペ シマ)
は じ め ま し て 、 私 は エイ キチ と いう 者 で す 。
テク ポリ に は 、 ユ ウキ チ と の っ て まし た が 本
当 は 、 エ イキ チ で す 。 ポ シェ ッ ト の M Z の 担
当 に な っ て 喜ん で いた ら 、 リ スト は 切り は り
の 山 。 ぶ きっ ちょ な 私 は 、 泣 き な が ら 切 り は
り を し た の で す 。 つ いで に 編集 室 で の 先輩 で
ある た けち ゃ ん は 、 大 学 で も 私 の 先輩 だ と い
うこ や か が がり まま もじ た 。 (エイ キチ )
) り ポシェット で は 、 す っ か りお な じみ に な っ
た 工作 者 の た けち ゃ ん で す 。 テ クボ ポリ 見 て な
い 人 は 、 4 ヵ月 ぶり の こと で 忘れ て る 人 も い
だ り し で 7 (ダグ メ で すそ ーッ )
秋 と いえ ば 、 食 欲 の 秋 ・ 読 書 の 秋 ・ ス ポー
ツ の 秋 と いろ いろ あり ます が 、 1 日 24 時 間 か
ら 、 通 学 十 学 校 オ テク ポリ 十 帰 宅 十 ご は ん 十
テク ノ ポ リス 増刊
プロ グラ ム ボ ポシェ エット 第 2 号
@ 発 行人 山下 辰己
@ 編 集 人 佐 激 伸 治
睡眠 を 引く と 、 な ん に も 残ら な い の で す 。 せ 、
せめ て 、 撮 り だ め た ビデ オ を 見 る 秋 と か 、
プラ モデ ル を 作る 秋 に な っ た らい いな 。
(捜索 願 ) この 夏 、 た けち ゃ ん 家 の ポ ケ コ ン
ちゃ ん (FX-702P ) が 行方 不明 に な っ て し ま
My ま も た 。 家 で は カセ ッ ド イシン タプ ェ イ スズ と
プリ ンタ が 泣い て いま す 。 早く 帰っ て くる よ
6 (た けち ゃ ん )
添削 担当 は いま いち 私 で す 。 打ち込み ミス
以外 に 、 私 の 添削 思想 に 対し て 文句 の ある 人
は 、 書 面 に て テク ノ ポ リス ・ プ ログ ラム ポ シ
ェ ッ ト 編 集 部 で ぶ 係 まで 。 し か し 、 結 局 は 私
が 正しい 予定 で す 。 (で NN
> で ぶ 大 先生 の 添削 教室 移植 コー ナー 用 プロ
グラ ム が で き あ が っ た の は 、 こ れ 以 上 お くれ
る と ポシェ ッ ト が E 刷 し て も ら え な いと いう 、
ギリ ギリ の 日 の 夜中 だ っ た 。 ぼ く が 、 最後 の
原稿 を ビシ ビシ 書い て いる 最 中 に 、 で ぶ 大 先
生か ら お 声 が か か っ た 。「 山 科 ク ン 、 忙 し いか
ね まき さか 展 し いで すず と いう わけ に は いか な
いい の で すばやく ヒマ な が さり を し て 、 ぽ ぼく は
で ぶ 大 先生 の も と へ か けつ けた 。「 先 生 、 つ い
に で きま し た か /」 す る と 、 で ぶ 大 先生 は ほ
(まえ まれ て 、「 で きた と も 。 ま あ 、 ち ょ っ と 試
し に 遊ん で みて くれ ん か 」「 は い 、 豆 ん で 」 で
ぶ 大 先生 は 、 み ず か ら [RILUIIN] [RET URN| と 、
手 慣れ た 様子 で すばやく 打ち 込ん で くだ さっ
た 。 す る と 、 お お 、 画 面 に は …… ア
?FN ErLOL‥・
それ か ら 、 突 然 で す が 67 ペ ー ジ の コラ ム も
よろ し くね 。 (For without 山科 )
ぉ 中山 農園 事件 と いい 、 純 真 ム ク で カワ イイ
じゃ ん / これ か ら は HH を 卒業 し て まがい も
の 人 生 を 歩む ん だ い 。 今日 も 空 は 青い ぜ 。
(ジャ ム と 釜めし よ 永 遠 に …… ハ ッ ト リ く ん )
@ 編 集 担 当 プ 山森 沿
人 @ 編 集 山 科 教 之
表紙 デザ イン グ 鈴 木 俊 明
交
フ
し
る
2
ス 日
和
2
O へ \J
Ss
どら
4
@ 本 文 デ ザイ ンプ ス ズ キ トシ アキ デザ イン オフ ィ ス ・ 高橋 典子
⑱ イ ラス トノ と り い か ず よ し ・ 増 田 秀 美 ・ お お ば みわ ・ 橋 岡 正和
人 写真 / 和 萩原 修
@ 還 刷 | 凸版 印刷 株
徳間 書店 1984 本 誌 掲載 の 写真 イラ スト 、 記 事 お よび プロ グラ ム
の 無断 転載 を 禁じ ます 。
食 技 術 / 橋 岡 正和 * 松下 武 諭 e 永吉 敏男 ・ 渋 谷
@⑯ フ ィ ニ ッシュ ・ デ ザイ ン ノ 伯 代 文 新 社
うわ る の テレ ビ 、 こ れ - 友 あれ ば お 楽し み は マ ル チ 。 テレ ビ と
し て 15 形 FS ブ ラウ ン 管 で 一 段 と 鮮明 。 ジョ イス ティ イッ ク を つ な
げ ば テレ ビ ゲ ー ム 機 に 。 パソ コン と し て キー ボー ド を つなげ ば
本 格 的 パソ コン に 。 一 友 で 大 満足 の 新しい 高 性 能 テ レビ 、
ゼネ ラル の ~ パ クソ ン ”。 も う 、 離 れ た 〈 く ない 、 離さ な い 。
W
テレ ビ 本 体 に MSX パソ コン を 内 蔵 。 合体 成功 の 高 性 能 テ レビ と
テ レ ビ PCT-50 形 (15 形 ) 標準 価格 128,000 円
ジョ イス ティ ッ ク PCJ-50 形 標準 価格 (1 コ ) 3,500 円
キー ボー ド PCK-50 形 標準 価格 18,500 円
の ひ 放 ラ A& に テレビ
ー 5 8 1 1 0 6 準
| | 上 RAM カ リッ ジ RJ02 形 回 8000 有
写真 シル バー(S に = ココ = NRJyWRBR ば 学習 プロ グラ ム な ど 容 量 の 大 き な 32KB( キ ロバ イ
他 に レッ ド (R) も あり ます ト ) 表示 の ソフ ト を 利 用 で きま す 。
人 @ RGB 回 路 直 結 で グラ フィ ッ ク 表 示 や 小さ い 文字 も 鮮明 表示 草 パ ソコ ン の 画面 ズレ が な く 調 整 不要 人 テレ ビィ ー つ パソ コン の 切り 換え も
ワン タッ チ 。 ア ン テ ナ 線 の 脱 や 配線 の 手間 も 不要 便 2.000 文 字 表 示 能 力 の 高 精度 15 形 FST 採 用 人 有線 放送 (ミッ ドバンド ) も 受信 可能
@ お 問合せ は 株式 会 社 ゼ ネ ラ ル 国内 営業 事業 部 開発 商品 課 吾 213 川 崎 市 高津 区 末 長 1116 番 地 容 044(866) 1111( 大 代表 )
※ ご 購入 の 際 は 、 購 入 年 月 日 、 販 売店 名 な どの 所 定 事項 を 記入 し た 保証 書 を 必ず お 受け と りく だ きい 。 記 S メ 4 は マイ クロ ソフ ト 社 の 商標 で す 。
この 秋 . コ ナニ の
可 に の 対応 ソフ ト
ら と の けら の の
多 ろ 6 ひ
96
ハイ バー スポ ボー ツ 1 \4.800
HYPER SPORTS 型式 RC715
④ ダ イ ビ ン グ @ 呪 馬 ( ち よう ば )
③ ト ラン ボリ ン 鉄棒
ーー ント
モノ 人 人 お 0 いち に さん 9 う \4.600
MONKEY ACADEMY 型式 RC702
敢 を か わし 、 ロ ー ル を お ろ し て 答え を
さがせ / モン 太 君 は 算数 の 天 オ 時 間
内
に 何 問 解け る
N
NN
1LOVE 田 数
スー バー コブ ラ ぎ \4.000
ダイ ハム バイ ロット ぎ 4800
プロ ッ ツガ ー \4.000
ハル 八 -ー オ ルル ピッ ク 1 \4.800
HYPER OLYMPIC 困 型式 RC710
④100m ダ ッ シ コ @ 走 り 幅 飛び
③ ハ ンマ ー 投 げ @400m 競 直
ルー オリ ピッ 2 \4800
HYPER OLYMPIC 回 | 型式 RC711
④110m ハ ー ド ル ② ヤ リ 投 げ
走り 高 飛 び @1500m 競 中
ぽん ば ぼ ば ご こ パ バン ぎ \4800
けつ きよ く 有 十 極 條 険 \4.800
COMIC BAKERY 型式 RRO714 ANTARCTIC ADVENTURE 型式 RC701
ご こ ご は オー トメ バン 工場 。 お や お や !P ベン ギン 君 、 ス ケー ト で 南極 大 陸 一 周 。
タメ ヌキ が ガバ パン を ね ら つ て ウロ チョ ロ 。 アザ ラ シ を さけ 、 遇 を キヤ ツチ / さあ
パン 職人 の ジョ ー は パン を 守れ る か ガ 。 量 地 は 目前 だ 。
PE ちち ゎ ち oo
3 の OO の つの ひい
レーン
に KA
コナ ミ の 麻雀 道場 \6.000 サー カス チャ ヤー リー ぎ \4.800
KONAMIS MAHJONG 型式 RC707 CIRCUS CHARLIE 型式 RC712
MSX 麻 雀 ゲ ー ム の 本 命 登場 / 本物 の さあ さあ お 立 台 い 。 世 紀 の 芸 当 の は じ
ゲー ム 指 向 は 当然 、 得 点 計算 で は な ん まり は じ ま り 。 チ ヤー リー 頑張 れ /
GREAT / FAROUT /
1LOVE O 理
昭 P デ て
1LOVE 社会
2 ーー 1TnE28858 AMrS4934 マ
較 通 信販 売 て で も お 求め で きま す
@ 現金 書留 て ご 注文 の 場合 … 住 所 ・ 氏 名 ・ 電 話 番 号 ・ 商 品名
コナ ミ マ イコ ン
TIME PILOT
襲い 来る 届 ナ 機 を 次 々 と 撃ち 沙 せ /
FROGGER
帰り だ いけ ご ど 危 険 が いつ ば ぱい 。 お 家 を めざし て ジャ ンプ /
と 符 の 解説 まで 詳細 に 表示 。
財 科 半
SUPER COBRA 型式 RC705 敵 の 対空 攻撃 は 激しい ぞ 。 高 射 砲 が 、
ミサ イル が 、UFO 〇 が …。 へ リコ プター で 、 ど こま で 進め る か や
型式 RC703 時 空 を 超え だ 戦闘 機 の 空中 コン バッ ト 。
型式 RC704 僕 は まい ご の わん ば ぱく ガエル 。 お 家 へ 電 (大阪 駅 前 第 4 ビル 1706 号 )
クラ ブフ 会員 募 集 /
xs に も 、 コミ ュ ニ ケー ショ ン
窟 。 の 場 を 生か し ませ ん が /
会 員 特 典 )
D 事 務 局 に ソフ トウ ェ ア 開 発 支援 装置 、
国内 外 の パー ソナ ルコ ンピュータ (ハー
ド ・ ソ フト ウェ ア ) 技術 情報 誌 を 自由 (
使用 する こと が で きま す 。
2 クラ ブフ 内 ・ 外 部 で 開発 され た 優れ た マ
イコ ン の ハー ド ・ ソ フト ウェ ア は 、 商 品
(9 る NG の Sg③ き きま の
| 3③ マ イコ ン に 関す る 講習 会 、 講 演 会 に 優
l 待 参加 で きま す 。
時 (④ 会 員 証 、 バ ッ ジ を 供与 いた し ます 。
(に
会 手続 ) @ 入会 金 1.000 円
@ 年 会 費 2.400 円 (月 200 円
虹
上 le 事務 局 ノ 大 阪 市 北 区 梅田 1 丁目
上 番号 1215 r コ ナミ マイ コン クラ ブ 」f
上
上
財
。 全 06( 345 )2456 担当 者 矢 谷
HHEEHHHRHHHH
を は っ きり 書 いて 、 商 品 価格 (送料 \500) の 合計 金額 を お 送
りく だ さい
@ 銀行 振込 で ご 注文 の 場合 … 下 記 の 銀行 口座 へ 合計 金額 を
振込 ん て で ください. 振込 後 、 ハ ガキ て 住所 ・ 氏 名 ・ 商 品名 を ご 連
絡 く だ さい
< 折込 先 > コナ ミ 株 式 会 社 ・ 第 1 勧業 銀行 ・ 市 ヶ 谷 支店 ・ 普 通 1073435
KOonami。
SOFTWARE
コナ ミミ 株式 会 社
東京 都 干 代田 区 九段 南 2 丁 目 3-14 TEL. 03(262)9111( 代 )
@ MSX マ ー ク は マイ クロ ソフ ト 社 の 商標 で す
@ この 商品 は 、 弊 社 (コナ ミ ) の 応 諾 な し に 海外 へ の 出荷 は で きま せん
E 届 |
〇 徳間 書店 "1984
凸版 印刷 雑 誌 06450 一 10
Printed in Japan
・ 剖 机 。 恒
LU ャ ーー ペー mLL NN に
( 計 ) こ らら の (6 の ょ ) の ら 天 涯
(cntokS っ ) oO の UNHLS 役 各
避 L
(CI